`
jedy
  • 浏览: 147734 次
  • 性别: Icon_minigender_1
  • 来自: 上海
文章分类
社区版块
存档分类
最新评论
文章列表

公积金怎么用

交通理财金融咨询工作
目前个人住房公积金贷款利率也随着贷款利率的上调而相应微幅上调。个人住房公积金贷款利率上调0.18个百分点，其中，5年(含)以下贷款由现行年利率3.78%调整为3.96%；5年以上贷款则由现行年利率4.23%调整为4.41%。以10年10万元公 ...

用ul,li制作导航条

CSS.netHTML
导航条该怎么做？http://www.onestab.net/seybold/index.html考虑你需要导航的内容是一些无序的链接这种情况：用 标签来编辑它们。link1 link2 link3 link4 link5 水平导航条我们可以用 CSS 来控制这个列表显示在网页上的外观。通过使用 display:inline 我们可以创建水平导航条。link1 link2 link3 link4 link5 这是上面这个导航条用到的代码：#nav1{margin-top: 1em;margin-bottom: 0.5em;}#nav1 ul {background-color: silver;t ...

emacs中格式化perl代码

EmacsPerlCC++C#
首先需要perltidy#!perl.exe# perltidy.pluse Tidy;Tidy::perltidy();将下面这个函数加到emacs中调用此函数，如果选择了region，就格式化region，否则格式化全文。;; emacs(defun wh-perl-format () (interactive) (message "Formatting, please wait...") (shell-command-on-region (if mark-active (region-beginning) (point-min)) (if mark-ac ...

vi中注释多行

CC++C#
<esc>0 跳到行首C-v 可视块模式jjj 下移3行(即打算在这3行价注释)I 进入插入模式(实际上是shift+i)// 注释<esc> 这个不可少

修改系统时间 (perl)

PerlWindows
转载调用windows api#!/usr/bin/perl -w# 2005.01.05 习作于武汉 writed by flwuse strict;use Win32::API;use Tk;my $ret;Win32::API::Struct->typedef( 'TIMESTRUCT' => qw( WORD wYear; WORD wMonth; WORD wDayOfWeek; WORD wDay; WORD wHour; WORD wMinute; WORD wSecond; WORD wMilliseconds; ...

分割字符串

CC++C#Perl
#!/usr/bin/perl -w############################################# 将一个字符串分成3个3个一组的6种方法# 执行的速度依次增加############################################use Benchmark qw(cmpthese);cmpthese 100, { 'Name1' => '$a="123456789" x 1000;($b=$a)=~s/(.{3})/$1|/g;$c=join ",",split /\|/,$b;', 'N ...

如何将Perl代码着色

PerlCSSQQCGIHTML
http://www.fayland.org/journal/Highlight.html   先决条件CPAN Syntax::Highlight::Perl 代码解释perldoc Syntax::Highlight::Perlperldoc里或许解释清楚了，但是蛮长了，我没耐心看。使用里面的代码一点反应都没有。 use Syntax::Highlight::Perl; my $formatter = new Syntax::Highlight::Perl;print $formatter->format_string($my_string);不想仔细看完全文，最主要是我懒，看英文 ...

lm_sensors

CC++C#.net
インストール Red HatのCDから適当なディレクトリに Lm_sensors のパッケージをコピーしてインストールします。rpm -ivh lm_sensors-<...>.rpm マザーボード上の各種センサーを自動検知させるsensors-detect YES,YES,YES,.../etc/modules.confにそれが示す行を追加します。/etc/rc.localにもそれが示す行を追加します。再起動しますか、sensors-detectが示すmodprode行を入力します。sensors これを表示します。sis5595-isa-8008 Adapter: ISA ...

怎样用正则表达式匹配汉字 (perl)

正则表达式Perl
转成unicode以后用property匹配，例（设输入输出编码为gb2312、gbk或gb18030）：use Encode;$_="abc你好wert";$a=decode('cp936',$_);($x)=($a=~m/(\p{Han}+)/);print encode('cp936',$x),"\n";

判断是否是数字 (perl)

Perl
$a=123;print "1. $a is number\n" unless (~$a & $a);$a="123";print "2. $a is number\n" unless (~$a & $a);$a="abc123";print "3. $a is number\n" unless (~$a & $a);

Plain Old Document －POD写法(perl)

PerlHTMLCC++C#
Plain Old Document －POD写法 一般包括一下几个部分： =head1 NAME The name of your program or module.   =head1 SYNOPSIS A one-line description of what your program or module does (purportedly).   =head1 DESCRIPTION The bulk of your documentation. (Bulk is good in this context.)   =head1 AUTHOR Who you are. (Or a ...

localtime的上限 (perl)

Perl
使用这两函数时，由于内部把纪元秒存为有符号整数，可表示正的和负的日期，但计算机存储器所表示的整数大小是有限的，用有限的位数来表示秒。这就是说，我们在计算纪元秒时，所表示的日期是有限制的。 确切的限度取决于你的机器所能表示的整数的位数。 Perl最多以32位的长度存储整数。粗略地讲，有一位用来表示正负号，其余31位来表示数。如果8位，你可以存储的最大数是255，即2的8次方减1。故Perl中所存储的32位符号数中的最大数为： print 2**31–1, "\n"; 2147483647 这个数字对应了哪个日期呢？ print scalar(gmtime 2**31-1), & ...

均值(haskell)

Haskell
想写一个求均值的函数。写成 mean x = sum(x) / length(x)总是类型不对，double/int除不了。没办法，还没有看到怎么转换类型，只有重写了一个length。mean x = sum(x) / len(x) where len [] = 0.0 len x = 1.0 + len (tail x)

RSS1.0规范

XML出版数据结构浏览器
http://yanghongyu.blogdriver.com/yanghongyu/90316.html                           RDF Site Summary (RSS) 1.0是一个轻量级多目的可扩展元数据描述和同步(syndication)格式。RSS是对XML的一种应用，遵循w3c的RDF规范，并且通过基于xml-命名空间和/或RDF的模块进行扩展。 rss1.0核心语法 元素 重要性 结构 说明 必备属性 <?xml version="1.0"?> 可选(除非指定编码) <rdf:RDF ...

RSS 2.0规范

SOAPXMLCGIWebBlog
RSS是 Really Simple Syndication的缩写（对rss2.0而言，是这三个词的缩写，对 rss1.0而言则是RDF Site Summary的缩写，1.0与2.0走的是两个体系）　　RSS 基于XML，所有的 RSS 必须遵循w3c网站上公布的XML 1.0 规范。　　在一个RSS文档中，根元素是& ...
Global site tag (gtag.js) - Google Analytics