Achte auf \Q \E!
--- sonst wird $_ nicht korrekt interpretiert?
m/$eviluserinput/
\Q maskiert Zeichen mit spezieller Bedeutung.
print $result, "\n";
<>;
exit;
--- was soll denn <>; bewirken?
Och, du bekommst die Eingabeaufforderung und siehst dadurch den printout in der vorangehenden Zeile.
mfg Beat
--
><o(((°> ><o(((°>
<°)))o>< ><o(((°>o
Der Valigator leibt diese Fische
><o(((°> ><o(((°>
<°)))o>< ><o(((°>o
Der Valigator leibt diese Fische