my @eingang2 = sort { $a->[1] cmp $b->[1] } @eingang;
das sollte funktionieren und ist sehr viel übersichtlicher.

deine subroutine gibt übrigens kein 0 zurück, wenn die werte gleich sind, ausserdem benutzt du map im "void-kontext", also du verwendest die ausgabe von map nicht. ich würde hier lieber for verwenden:
chomp for @eingang