Um ehrlich zu sein, ja.

Mein Problem ist, dass ich den Code von dir im Grunde nicht verstehe und nicht weiss, warum dass es so funktioniert oder eben nicht funktioniert respektive was gewisse Syntax-Stellen genau bedeuten - und wie ich den Rest (grösstes Problem ist wiederum der Syntax) umzusetzen habe.
Ich bin, was Perl betrifft, ziemlich neu.

Sollte es Dich nicht zu viel Zeit kosten, mir dies so zu erklären (Code + Kommentar), dass auch ich es verstehe, wäre ich dir äusserst dankbar, wenn du dies tun könntest. Denn ich will verstehen, was ich mache - um es bei einem nächsten Mal auch in abgewandelter Form alleine umsetzen zu können.

Mir ist jedoch auch klar, dass du mit deinem Know-How in der gleichen Zeit vielen anderen nützliche Tipps geben könntest und ich weiss ehrlich gesagt auch nicht, wie hoch die Perl Kenntnisse sein sollten, um sich in diesem Forum zu bewegen (bin heute per Zufall darüber gestolpert).