C:\cygwin\home\Keszler>dir
Directory of C:\cygwin\home\Keszler
12/08/2011 07:33 PM 12 test.chr
12/08/2011 07:35 PM
x
C:\cygwin\home\Keszler>cd x
C:\cygwin\home\Keszler\x>dir
Directory of C:\cygwin\home\Keszler\x
12/08/2011 07:35 PM 155 test.pl
C:\cygwin\home\Keszler\x>type test.pl
#!/usr/bin/perl
use strict;
use POSIX;
use warnings;
open (NEWFILE, "/home/Keszler/test.chr");
print "Start";
while()
{
print $_;
}
print "end";
C:\cygwin\home\Keszler\x>test.pl
readline() on closed filehandle NEWFILE at C:\cygwin\home\Keszler\x\test.pl line 7.
Startend
C:\cygwin\home\Keszler\x>