Denham Eva [DE], on Monday, September 6, 2004 at 14:41 (+0200) typed:
DE> my $filedate =~ s/(\d+)//g;
DE> ********** DATA ************
DE> C:/directory/MSISExport_20040814.csv
DE> C:/directory/MSISExport_20040813.csv
DE> Can someone help me with that regex? I am having a frustrating time of
I hope this help you:
use strict;
for (<DATA>) {
print "$1\n" if /MSISExport_(\d+)\.csv$/gi;
}
__DATA__
C:/directory/MSISExport_20040814.csv
C:/directory/MSISExport_20040816.csv
C:/directory/MSISExport_20040817.csv
C:/directory/MSISExport_20040824.csv
--
...m8s, cu l8r, Brano.
["Paragraph. Paragraph. Paragraph. Paragraph. Paragraph." -David Moser]
-=x=-
Skontrolované antivírovým programom NOD32
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
