diff GrepFile.pl @ 4:606e24c6fda0 draft

Uploaded
author geert-vandeweyer
date Mon, 28 Jul 2014 07:45:02 -0400
parents dba6ffec8e2e
children 7b3d89b8fc9f
line wrap: on
line diff
--- a/GrepFile.pl	Thu Feb 13 08:39:41 2014 -0500
+++ b/GrepFile.pl	Mon Jul 28 07:45:02 2014 -0400
@@ -113,9 +113,10 @@
 else {
 	die('only "file" and "single" are supported as value of the -t flag');
 }
-
-for ($i = 1; $i<= $nrgrep ; $i++) {
-	${"grep$i"}->join();
+if ($type eq 'file') {
+	for ($i = 1; $i<= $nrgrep ; $i++) {
+		${"grep$i"}->join();
+	}
 }
 $printqueue->enqueue(undef);
 $print->join();