Select Code to Download

#! perl -slw
use strict;
...
else {
    print "None of @ARGV were found";
}

P:\test>412014 -DRIVES=CDPR junk\.htm$ 412014 copyrght  \bcmd\.exe  CM
+D\.EXE
          junk\.htm$ :  was found at 'A          C:\Perl\test\junk.htm
+'
...
            copyrght :  was not found.
              412014 :  was found at 'A          C:\Perl\test\412014.p
+l'
            CMD\.EXE :  was found at 'A          C:\WINDOWS\SYSTEM32\C
+MD.EXE'