F
Fiaz Idris
I am using Win98SE and cygwin
$ uname -a
CYGWIN_98-4.10 fiaz 1.5.5(0.94/3/2) 2003-09-20 16:31 i686 unknown unknown Cygwin
Say, I have a file 'stations.txt'
ABBEY WOOD
ABERGELE & PENSARN
CILMERI
CITY THAMESLINK
CLACTON
WATERINGBURY
WATERLOO (MERSEYSIDE)
and the following perlscript
while (<>) {
chomp;
$curr = $_;
$scurr = join '', (sort split //, $curr);
$scurr =~ s/\W//g;
# Behaviour inconsistent between ActivePerl5.8 & Cygwin Perl
# $curr although printed can't be seen.
print "$curr and $scurr\n";
}
The expected CORRECT result according to ActivePerl 5.8.0 is
ABBEY WOOD and ABBDEOOWY
ABERGELE & PENSARN and AABEEEEGLNNPRRSamp
CILMERI and CEIILMR
CITY THAMESLINK and ACEHIIKLMNSTTY
CLACTON and ACCLNOT
WATERINGBURY and ABEGINRRTUWY
WATERLOO (MERSEYSIDE) and ADEEEEILMOORRSSTWY
But, the cygwin perl version
(This is perl, v5.8.2 built for cygwin-thread-multi-64int)
gives the following WRONG result.
and ABBDEOOWY
and AABEEEEGLNNPRRSamp
and CEIILMR
and ACEHIIKLMNSTTY
and ACCLNOT
and ABEGINRRTUWY
and ADEEEEILMOORRSSTWY
that is the first variable $curr is not shown. Although it is printed
somehow it gets backtracked and deletes and prints only from the space
and after.
Am I missing something? Is it a bug with Cygwin perl? Can someone please advise.
$ uname -a
CYGWIN_98-4.10 fiaz 1.5.5(0.94/3/2) 2003-09-20 16:31 i686 unknown unknown Cygwin
Say, I have a file 'stations.txt'
ABBEY WOOD
ABERGELE & PENSARN
CILMERI
CITY THAMESLINK
CLACTON
WATERINGBURY
WATERLOO (MERSEYSIDE)
and the following perlscript
while (<>) {
chomp;
$curr = $_;
$scurr = join '', (sort split //, $curr);
$scurr =~ s/\W//g;
# Behaviour inconsistent between ActivePerl5.8 & Cygwin Perl
# $curr although printed can't be seen.
print "$curr and $scurr\n";
}
The expected CORRECT result according to ActivePerl 5.8.0 is
ABBEY WOOD and ABBDEOOWY
ABERGELE & PENSARN and AABEEEEGLNNPRRSamp
CILMERI and CEIILMR
CITY THAMESLINK and ACEHIIKLMNSTTY
CLACTON and ACCLNOT
WATERINGBURY and ABEGINRRTUWY
WATERLOO (MERSEYSIDE) and ADEEEEILMOORRSSTWY
But, the cygwin perl version
(This is perl, v5.8.2 built for cygwin-thread-multi-64int)
gives the following WRONG result.
and ABBDEOOWY
and AABEEEEGLNNPRRSamp
and CEIILMR
and ACEHIIKLMNSTTY
and ACCLNOT
and ABEGINRRTUWY
and ADEEEEILMOORRSSTWY
that is the first variable $curr is not shown. Although it is printed
somehow it gets backtracked and deletes and prints only from the space
and after.
Am I missing something? Is it a bug with Cygwin perl? Can someone please advise.