Parent Directory
|
Revision Log
|
Patch
| revision 1.13 by wakaba, Sat Jun 23 06:38:12 2007 UTC | revision 1.14 by wakaba, Mon Jun 25 11:05:57 2007 UTC | |
|---|---|---|
| # | Line 39 for my $file_name (grep {$_} split /\s+/ | Line 39 for my $file_name (grep {$_} split /\s+/ |
| 39 | ${dir_name}tests5.dat | ${dir_name}tests5.dat |
| 40 | ${dir_name}tests6.dat | ${dir_name}tests6.dat |
| 41 | ${test_dir_name}tree-test-1.dat | ${test_dir_name}tree-test-1.dat |
| 42 | ${test_dir_name}tree-test-2.dat | |
| 43 | ]) { | ]) { |
| 44 | open my $file, '<', $file_name | open my $file, '<', $file_name |
| 45 | or die "$0: $file_name: $!"; | or die "$0: $file_name: $!"; |
|
||||||||
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |