Antagligen bara ett returtecken som brukar komma med när man kör på en winmaskin.
Lägg till raden
$form{'mintext'} =~ s/\r//g;
under dina andra rader som ersätter tecken.
Läsa in fil och ersätta prylar
21 svar · 471 visningar · startad av Erik Juhlin · sida 2 av 2
Frågan, av Erik Juhlin
Jojoxx hjälpte mig med den här koden. !/usr/bin/perl read(STDIN, $buffer, $ENV{'CONTENTLENGTH'}); @pairs = split(/&/, $buffer); foreach $pair (@pairs) { ($name, $value) = split(/=/, $pair); $value = tr/+/ /; $value = s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; $form{$name} = $value; } Ersätta tecken $form{'mintext'} = s/</</g; $form{'mintext'} = s/>/>/g; $form{'mintext'} =
Läs frågan i sin helhet →
Tack, har inte testat det, men det ska nog funka! 
Jag tror Jojoxx hade med det när han hjälpte mig med en ersättningsgrej till gästboken. Men när han hjälpte mig med detta glömde/skippade han det..