Select Code to Download

my %lookfor: shared; @lookfor{ @ARGV } = ();

$line =~ $_ and $lookfor->{ $_ } = $line for keys %{ $lookfor };

last if keys %$lookfor == grep defined, values %$lookfor;

my @dones  : shared = ( 0 ) x @cmds;

    \$dones[ $_ ],

$$doneRef = 1;

sleep 1 while grep( $_, @dones ) < @cmds;

                ## Set the quitNow if the value indicates this
                $$quitNow = ( $lookfor->{ $_ } eq '1' );

#! perl -slw
use strict;
...
              412014 :  was not found.
          junk\.htm$ :  was not found.
            copyrght :  was found at '     R     R:\cookbook\copyrght.
+htm'