C:\Dokumente und Einstellungen\Renee>perl -le "print 'test'" > test

C:\Dokumente und Einstellungen\Renee>perl
open(my $fh,'<','test') or die $!;
while(<$fh>){print} 
close $fh;
^D
test