http://qs1969.pair.com?node_id=523840


in reply to Pattern match

$mystring = "Rescue21_binaries_V5.0.29.0_patch_R5.0.24.1_DiffList.txt"
+;

if( $mystring =~ m/Rescue21.*_patch_.*DiffList.txt/ )
{
    print "Matched\n";
}

[download]
i suggest you read perldoc perlretut and perldoc perlre

In Section Seekers of Perl Wisdom