I tried to reproduce this using your code.
My data:
Perl er et fortolket højniveau-programmeringssprog. Perl blev skabt i
+1987 af Larry Wall under Unix for at gøre rapportering lettere. Siden
+ 1987 har Perl undergået store forandringer og er i dag et generelt a
+nvendeligt programmeringssprog som kan afvikles på flere forskellige
+platformer, herunder bl.a. Windows og Unix. Perl tilbyder kraftfuld t
+eksthåndterings-mekanismer som ikke ses lige i noget andet programmer
+ingssprog, bl.a. ved hjælp af regulære udtryk. Perl har modsat de fle
+ste almindelige programmeringssprog ikke nogen begrænsning mht. længd
+er på data. Perl ses oftest brugt i forbindelse med webside programme
+ring (CGI scripts, Common Gateway Interface). Som webside-programmeri
+ngssprog konkurrerer Perl især mod sprog som PHP, Ruby og Pyton. Perl
+ bliver ofte refereret til som "The Swiss Army chainsaw of programmin
+g languages" pga. sin fleksibilitet og generelle anvendelighed.
My Perl version is v5.12.3 built for darwin-thread-multi-level2
# ./danish.pl == your code
Karls-Mac-mini:Desktop karl$ ./danish.pl danish.txt > out.txt
Karl-Mac-mini:Desktop karl$ diff danish.txt out.txt
#...seems like it's OK
What is your original data? Regards, Karl
«The Crux of the Biscuit is the Apostrophe»