This is the code I have used and its not working....am I missing some syntax here?
open (FILE, "<$list") or die "$list failed: $!\n"; @srvr = <FILE>; close (FILE); foreach $ARGV ( @ARGV ) { #$exists = grep { $ARGV eq $_ } @srvr; if (!$exists) { print "Cant do this"; # exit (1); } }
20040626 Edit by Corion: Added CODE tags
In reply to Re^2: grep exact words
by Anonymous Monk
in thread grep exact words
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |