>perl -wMstrict -le "my $head = qr{ rtl_genoa_cet_300color- }xms; my $tail = qr{ \.BIN\.xml }xms; my $hyphenated_numbers = qr{ \d\d - \d\d - \d\d }xms; my $filename = qr{ \A $head $hyphenated_numbers $tail \z }xms; print qq{\noutput:}; for my $string (@ARGV) { print $string if $string =~ $filename; } " rtl_genoa_cet_300color-46-13-03.BIN.xml rtl_genoa_cet_300color-46-13-03.BIN-summary.xml rtl_genoa_cet_300color-47-13-04.BIN.xml rtl_genoa_cet_300color-47-13-04.BIN-summary.xml rtl_genoa_cet_300color.xml rtl_genoa_cet_600color-1-08-01.BIN.xml rtl_genoa_cet_600color-1-08-01.BIN-summary.xml rtl_genoa_cet_600color-49-13-06.BIN.xml rtl_genoa_cet_600color-49-13-06.BIN-summary.xml rtl_genoa_cet_600color.xml output: rtl_genoa_cet_300color-46-13-03.BIN.xml rtl_genoa_cet_300color-47-13-04.BIN.xml
In reply to Re: Regular Expression required.
by AnomalousMonk
in thread Regular Expression required.
by anand_perl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |