my $search_string = 'C04\w*'.substr($year, 2, 2).$mon.$day.'\w*.ORD_AP +I'; my $dir = 'C:\\done\\'; my $file; my $i; opendir DIR, $dir; my @file = grep {/^$search_string/} readdir DIR; closedir DIR; foreach $file(@file){ print $dir.$file[$i]."\n"; $i++; }
In reply to Re^2: Help with grep **RESOLVED**
by LeeC79
in thread Help with grep
by LeeC79
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |