BTW although the '.' meta-character doesn't hurt you in this case, it does mean you are risking a match-positive when you would expect a match negative

e.g.

$a = 'hello.world';
$b = 'helloxworld';

print "matched" if $b =~ /$a/;
[download]

You will get a match in the above example (because '.' means any single character in a regex).