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'"); |