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    <DIR>          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(<NEWFILE>)
{
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>

##</code><code>##

$ pwd
/home/Keszler/x

$ ls -l
total 1
-rwxr-xr-x 1 Keszler None 155 Dec  8 19:35 test.pl

$ ls -l ..
total 1
-rw-r--r--  1 Keszler None 12 Dec  8 19:33 test.chr
drwxr-xr-x+ 1 Keszler None  0 Dec  8 19:35 x

$ cat test.pl
#!/usr/bin/perl
use strict;
use POSIX;
use warnings;
open (NEWFILE, "/home/Keszler/test.chr");
print "Start";
while(<NEWFILE>)
{
print $_;
}
print "end";

$ ./test.pl
Start1,2,3
a,b,c
end
$