C:\>copy con test.pl
print "geht doch \n\n";
^Z
        1 Datei(en) kopiert.

C:\>perl test.pl
geht doch


C:\>