2019-10-05T07:52:25 rosti

PS: Die 5.10 Features kenne ich. Hab ich noch nie gebraucht. Meine Alternative zu say:

Code (perl): (dl )

1
2
3
4
5
6

sub puts{
    use bytes;
    local $, = "\n";
    local $\ = "\n";
    print @_;
}

Ging schon immer. Siehe perldoc perlvar.

Das sieht man Deinem Code schon an manchen Stellen an, dass Du die Neuerungen in Perl nicht brauchst und lieber alles selber auf Deine eigene Art und Weise ausprogrammierst. Das ist nicht direkt falsch, ich halte es aber auch nicht für empfehlenswert.