Mercurial > repos > geert-vandeweyer > advanced_grep_from_file
comparison GrepFile.pl @ 4:606e24c6fda0 draft
Uploaded
| author | geert-vandeweyer |
|---|---|
| date | Mon, 28 Jul 2014 07:45:02 -0400 |
| parents | dba6ffec8e2e |
| children | 7b3d89b8fc9f |
comparison
equal
deleted
inserted
replaced
| 3:94ba1a8de091 | 4:606e24c6fda0 |
|---|---|
| 111 } | 111 } |
| 112 } | 112 } |
| 113 else { | 113 else { |
| 114 die('only "file" and "single" are supported as value of the -t flag'); | 114 die('only "file" and "single" are supported as value of the -t flag'); |
| 115 } | 115 } |
| 116 | 116 if ($type eq 'file') { |
| 117 for ($i = 1; $i<= $nrgrep ; $i++) { | 117 for ($i = 1; $i<= $nrgrep ; $i++) { |
| 118 ${"grep$i"}->join(); | 118 ${"grep$i"}->join(); |
| 119 } | |
| 119 } | 120 } |
| 120 $printqueue->enqueue(undef); | 121 $printqueue->enqueue(undef); |
| 121 $print->join(); | 122 $print->join(); |
| 122 | 123 |
| 123 system("cp $tmpdir/result.txt '$outfile'"); | 124 system("cp $tmpdir/result.txt '$outfile'"); |
