llgd.net
当前位置:首页 >> pErl %D >>

pErl %D

use POSIX;my $year_month_day=strftime("%Y%m%d",localtime()); 这是现成的函数,不用再自己搞了。 %Y 是 YYYY格式的年 %m是mm格式的月 %d是dd格式的日。 自己想要什么格式,如"%Y-%m-%d" 就是YYYY-MM-DD,自己调整就OK。

STDIN要大写另外lay 和layer是不一样的

进入退出: perl -d debugtest用调试器载入perl程序运行,交互式界面 Loading DB routines from perl5db.pl version 1.3 Editor support available. Enter h or `h h' for help, or `perldoc perldebug' for more help. main::(p4.pl:2): my($xx...

你的bat文件执行出错了。 你在system()后面加上以下代码,看看打印的是什么 if ($? == -1) { print “failed to execute: $!\n”; } elsif ($? & 127) { printf “child died with signal %d, %s coredump\n”, ($? & 127), ($? & 128) ? ‘with’ :...

程序代码: my(%d1,%d2,$str,$key,$val);my($id,$a,$b,$c,$d,$e,$f,$g);#读取文件1open(FD,'1');while(){ chomp; ($id,$a,$b,$c,$d)=split(/\s+/); $d1{$id}="$a\t$b\t$c\t$d";}close(FD);#读取文件2open(FD,'2');while(){ chomp; ($id,$e,$f,$g...

如果你编译本文档中的脚本有困难。那么你不是一个人在战斗。记住重要原则: 以编译你的perl的方式,编译你的程序(不好意思) 并且,每一个使用了Perl的C程序都必须连接 perl 库. 你问,那是什么?Perl本身就是用C写的。Perl库是编译过的用来创建...

use 5.16.0; use strict; my $value = 2; my $printString = "the value is ".($value+1); print $printString;

其实你那个输出的“not 10:空字串"并不是说冒号后边什么都没有了你最好把输出结果输出到文本文件中查看。print函数打印一个字串或者一列用逗号分隔的字串,也就是字串环境,这就是为什么最后打印的是空字串而不是0.如果你想打印0的话,可以...

不知道是否是你需要的: 十进制转二进制: perl -e '$dec=10;$bin =sprintf("%b",$dec);print $bin;' 反过来: perl -e '$bin=0b1010;$dec=sprintf("%d",$bin);print $dec;'

我精通perl,你这个问题很好解决。 如果你要perl解决,请追问。 我写一个你看的懂的perl给你,不用模块。 perl教会了我懒惰,所以我又学了awk,sed 如果你的所有文件,第一列完全一致,如果你有linux,我推荐你用我下面的2个命令来解决你的问题...

网站首页 | 网站地图
All rights reserved Powered by www.llgd.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com