Perl
关注
分享
扫一扫
mjk
这个作者很懒，什么都没留下…
展开
-
perl中如何查看文件或目录的时间
#!/usr/bin/perluse POSIX qw(strftime);while($filename = ){ if (-d $filename){ print "Directory : "; } print $filename; print x (25 - length($filename)); ($d转载 2009-11-07 16:52:00 · 2316 阅读 · 0 评论 -
map 和grep结合使用
map 和grep结合使用map {print} grep {//.txt$/}原创 2009-12-06 21:26:00 · 387 阅读 · 0 评论 -
列出main包内的所有变量情况
Normal 0 7.8 磅 0 2 false false false <!-- /* Style Definitions原创 2009-12-06 21:29:00 · 538 阅读 · 0 评论