my $string = "1.234.567.txt"; print "Match.\n" if /567.txt/;