perl 例子

$cond =~ s/\[COL\:([\w_]+)\]/\$\$phash_msg\{\"$1\"\}/ig;

my %hashMessage = $oldMsg =~ /(\w+)=\'([^\']*)\'/g;

perl -e "print crypt ('blah','iv');"
posted @ 2012-11-28 17:57  vigarbuaa  阅读(143)  评论(0)  编辑  收藏  举报