#!/usr/bin/perl
`cd c:\\windows`;
@lines=`dir c:\\windows\\*.log`;
for($i=0; $i<@lines; $i++){
print"$i\t\t$lines[$i]\n";
}
@lines=`dir c:\\windows\\*.log`;
for($i=0; $i<@lines; $i++){
}
Perl真是太强大了,呵呵。
本文展示了如何使用Perl编程语言读取并打印Windows目录下的日志文件内容,突显了Perl的强大功能。
~~the end~~
尹曙光

被折叠的 条评论
为什么被折叠?