Du schreibst
 if(!$objekt->methode())
und meinst eigentlich
 unless($objekt->methode())
oder
 if(! $objekt->methode())
oder
 if(not $objekt->methode())
.

Weil das ! ohne Trennzeichen an $handle steht, wird Perl zuerst diese Operation mit den Objekt $handle ausführen, es also logisch negieren. (Perl macht Unterschiede, wenn der Operator ohne Trennzeichen geschrieben wird.) Damit wird $handle logisch falsch und es ist kein Objekt mehr. Entweder Du schreibst ein Leerzeichen nach dem ! oder Du schreibst not anstatt !, not bindet weniger. if(not ...) oder if (! ...) ist aber nicht Perl, so etwas kennst Du von anderen Programmiersprachen her.

Ich glaube das ist es, denn Perl führt es immer so aus, wie es geschrieben steht.\n\n

<!--EDIT|steffenw|1072986804-->