> perl -e ' $_="a\n"; print "match\n" if (m/^a\n$/); '
match
> perl -e ' $_="a\n"; print "match\n" if (m/^a$/); '
match