Du öffnest die Datei zum Schreiben im "Überschreib-Modus"... Da ist es kein Wunder, dass die Datei leer ist...

perldoc -f open beschreibt die verschiedenen Modi beim Öffnens... Vielleicht auch mal davor als Grundlage perldoc perlopentut lesen ...