$ perl -lwe 'print "match" if "foo\n" =~ /[^\n]*\z/'
match
$ perl -lwe 'print "match" if "foo\n" =~ /.*\z/'