my @dependantFiles = ( 'aa', 'bb', 'cdef' ); my @namedFiles = ( 'cc', 'bb', 'dde' ); for my $y ( @dependantFiles ) { if( grep /$y/i, @namedFiles) { print "Found $y \n"; last; } else { print "not $y \n"; } }
In reply to Re: regex expression help
by bangers
in thread regex expression help
by JFarr
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |