Lineseperator Problem

[Karle]

»» Hat jemand eine Idee, wo mein Fehler liegt?

#!/usr/bin/perl -w
use strict;

local $/ = "\n\n";
while(<DATA>) {
chomp;
print "BEGIN $_ END\n";
}

Ist immernoch folgendes Ergebnis:

[code lang=perl]Ergebnis:
BEGIN Ausgabe 1
Ausgabe 2
Ausgabe 3

Ausgabe 1
Ausgabe 2
Ausgabe 3 END

  
Ist die Leerzeile vielleicht gar kein \n? Kann man die Steuerzeichen irgendwie ausgeben? Mein OS ist Solaris.  
  
Gruss  
Karle