我试过这个:
test1.pl >output.log 2>&1
但这是结果:
Can't dup STDOUT: Permission denied at C:/Perl/lib/Test/Builder.pm line 1376. Compilation Failed in require at C:/Perl/lib/Test/Builder/Module.pm line 3. BEGIN Failed--compilation aborted at C:/Perl/lib/Test/Builder/Module.pm line 3. Compilation Failed in require at C:/Perl/lib/Test/More.pm line 22. BEGIN Failed--compilation aborted at C:/Perl/lib/Test/More.pm line 22. Compilation Failed in require at C:/Perl/site/lib/Test/WWW/Selenium.pm line 72. BEGIN Failed--compilation aborted at C:/Perl/site/lib/Test/WWW/Selenium.pm line 72. Compilation Failed in require at C:\Software\selenium-remote-control-1.0-beta-2\tests\test1.pl line 5. BEGIN Failed--compilation aborted at C:\Software\selenium-remote-control-1.0-beta-2\tests\test1.pl line 5.
只要我不尝试以任何方式重定向命令行的输出,脚本就会运行文件.
这是我的脚本,以防万一. (这是一个Selenium测试脚本):
#!C:/perl/bin/perl.exe -w use strict; use warnings; use Time::HiRes qw(sleep); use Test::WWW::Selenium; use Test::More "no_plan"; use Test::Exception; my $sel = Test::WWW::Selenium->new( host => "localhost",port => 4444,browser => "*chrome",browser_url => "http://localhost/" ); print "Start Time: " . localtime() . "\n"; for (my $count = 3000; $count > 0; $count--) { print $count . " tests remaining.\n"; $sel->open_ok("/home"); $sel->click_ok("link=News"); $sel->wait_for_page_to_load_ok("30000"); $sel->click_ok("video"); $sel->wait_for_page_to_load_ok("30000"); $sel->click_ok("link=Sports"); $sel->wait_for_page_to_load_ok("30000"); $sel->click_ok("link=Movies"); $sel->wait_for_page_to_load_ok("30000"); $sel->click_ok("moremovies"); $sel->wait_for_page_to_load_ok("30000"); } print "End Time: " . localtime() . "\n";