Der Subroutine wird ein Parameter (der Dateiname) übergeben. Der steht dann in @_. Mit shift hole ich ein Element aus dem Array und speichere den Wert in $file...