sieht von der syntax gut aus, und die eigendlichen aktionen hast du ja auch schon in subroutinen ausgelagert.

du könntest das nur einheitlicher einrücken (oder ist das beim pasten ins forum verrutscht?) und dich auf eine zeilenlänge von 80 Zeichen beschränken, siehe perldoc perlstyle. du könntest dir auch mal perltidy anschauen, die standartformatierung davon gefällt mir sehr gut.