In Datei schreiben und zwar sortiert

[Kahn]

hi.

danke hab mich mal mit tie:file auseinander gesetzt hab aber leider keine hilfreiche hilfe dazu gefunden also zu meinem problem darum hab ich es so gemacht:

my @liste;
tie @liste, 'Tie::File', "datei.txt";
@liste = sort @liste;
untie @liste;

das klappt zwar wunderbar nur gibt es da ein problem: es werden einfach leerzeilen eingefügt. ich habe auch von perldoc von autochomp => 0 gelesen aber das bringt auch nichts.
was mach ich (schonw ieder) falsch?

lg