以下脚本存储阵列中的所有文件和目录@file_list
.
我如何只筛选具有.lt6
扩展名的文件,而不是其他文件?
opendir (CURRDIR, $localdir);
@file_list = grep !/^\.\.?$/, readdir CURRDIR;
print STDOUT "Found Files: @file_list\n";
Run Code Online (Sandbox Code Playgroud)
干杯
我只是Perl的初学者,在使用Perl脚本过滤列时需要一些帮助.我在文件中有大约10个以逗号分隔的列,我需要在该文件中保留5列并从该文件中删除所有其他列.我们如何实现这一目标?
非常感谢任何人的帮助.
欢呼,尼尔
我正在尝试使用Perl脚本中的cURL下载并输出到文件.
1)我必须通过下面的用户名和密码.我应该使用什么开关?
2)当我执行Perl脚本时,这就是我得到的:
Can't locate WWW/Curl.pm in @INC (@INC contains: f:/Perl/site/lib f:/Perl/lib .) at onesec.pl line 9. BEGIN failed--compilation aborted at haroldonesec.pl line 9.
use WWW::Curl;
curl http://download2.emu-lochard.com/sfo1/gru?start-time=2009-08-15+00%3A00%3A00&end-time=2009-08-15+12%3A59%3A59&time-zone=GMT&metric=laeq --data --O curllaeq.txt
Run Code Online (Sandbox Code Playgroud)
3)我如何使用Wget做同样的事情?
我使用以下但收到错误:
use LWP::Simple;
wget --user=username --password=password http://download2.emu-lochard.com/sfo1/gru?start-time=2009-08-15+00%3A00%3A00&end-time=2009-08-15+12%3A59%3A59&time-zone=GMT&metric=laeq -O laeq.txt
Run Code Online (Sandbox Code Playgroud)