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。

程序代码: 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 %f -m201002 工作目录用%d,应该可以。

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