- Timestamp:
- 07/30/08 07:11:31 (5 months ago)
- Files:
-
- 1 modified
-
misc/evalbot/evalbot.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
misc/evalbot/evalbot.pl
r21627 r21628 83 83 std => { 84 84 chdir => '../../src/perl6', 85 cmd_line => $^X . ' tryfile %program > > %out 2>&1',85 cmd_line => $^X . ' tryfile %program >/dev/null 2>%out', 86 86 revision => \&get_revision, 87 87 filter => \&filter_std, … … 202 202 sub filter_std { 203 203 my $str = shift; 204 if($str =~ / #+ PARSE FAILED #+/) {204 if($str =~ /PARSE FAILED/) { 205 205 my @lines = split /\n/, $str; 206 206 return $lines[1];
