...und wenn du nun auch noch:

... die "ERROR: Unable to open kundencounter.csv. Reason: $!";

schreiben würdest, würde die Perl auch sagen, warum das Öffnen fehlgeschlagen ist.