my $foo = qq(); my $bar = qq(

Test (Änderung)

\n); if ($bar =~ m($foo)) { die "geht doch"; }