Skip Menu |
 

This queue is for tickets about the IO CPAN distribution.

Report information
The Basics
Id: 48604
Status: rejected
Priority: 0/
Queue: IO

People
Owner: Nobody in particular
Requestors: kwilliams [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 1.25
Fixed in: (no value)



Subject: IO::File->new() doesn't obey Unicode settings
Download (untitled) / with headers
text/plain 3.8k
I get different behavior opening a file depending on whether I use open() or IO::File->new(): --------------------------- % perl -Cio -le 'open($f, "< /tmp/testfile.txt") or die $!; $line=<$f>; print "is utf8: ", utf8::is_utf8($line)' is utf8: 1 % perl -Cio -le 'open($f, "/tmp/testfile.txt") or die $!; $line=<$f>; print "is utf8: ", utf8::is_utf8($line)' is utf8: 1 % perl -MIO::File -Cio -le '$f=IO::File->new("/tmp/testfile.txt") or die $!; $line=<$f>; print "is utf8: ", utf8::is_utf8($line)' is utf8: % perl -MIO::File -Cio -le '$f=IO::File->new("< /tmp/testfile.txt") or die $!; $line=<$f>; print "is utf8: ", utf8::is_utf8($line)' is utf8: --------------------------- I know IO::File uses open() behind the scenes, but I haven't yet figured out why the behavior is different. The above is with perl 5.8.8 on OS X 10.5.7, and I get the same results using perl 5.10.0. Summary of my perl5 (revision 5 version 8 subversion 8) configuration: Platform: osname=darwin, osvers=9.0, archname=darwin-thread-multi-2level uname='darwin b02.apple.com 9.0 darwin kernel version 9.3.0: tue aug 12 17:18:07 pdt 2008; root:xnu-1228.5.90~13release_i386 i386 ' config_args='-ds -e -Dprefix=/usr -Dccflags=-g -pipe -Dldflags= -Dman3ext=3pm - Duseithreads -Duseshrplib' hint=recommended, useposix=true, d_sigaction=define usethreads=define use5005threads=undef useithreads=define usemultiplicity=define useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=define use64bitall=define uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags ='-arch ppc -arch i386 -g -pipe -fno-common -DPERL_DARWIN -no- cpp-precomp -fno-strict-aliasing -Wdeclaration-after-statement -I/usr/local/include', optimize='-O3', cppflags='-no-cpp-precomp -arch ppc -g -pipe -fno-common -DPERL_DARWIN -no- cpp-precomp -fno-strict-aliasing -Wdeclaration-after-statement -I/usr/local/include' ccversion='', gccversion='4.0.1 (Apple Inc. build 5465)', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define Linker and Libraries: ld='cc -mmacosx-version-min=10.5.7', ldflags ='-arch ppc -arch i386 -L/usr/local/lib' libpth=/usr/local/lib /usr/lib libs=-ldbm -ldl -lm -lutil -lc perllibs=-ldl -lm -lutil -lc libc=/usr/lib/libc.dylib, so=dylib, useshrplib=true, libperl=libperl.dylib gnulibc_version='' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags='-arch ppc -arch i386 -bundle -undefined dynamic_lookup - L/usr/local/lib' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP USE_ITHREADS USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API Locally applied patches: fix for regcomp CVE-2007-5116 security vulnerability fix for double-free CVE-2008-1927 security vulnerability /Library/Perl/Updates/<version> comes before system perl directories installprivlib and installarchlib points to the Updates directory Built under darwin Compiled at Mar 11 2009 16:09:08 @INC: /Library/Perl/Updates/5.8.8/darwin-thread-multi-2level /Library/Perl/Updates/5.8.8 /System/Library/Perl/5.8.8/darwin-thread-multi-2level /System/Library/Perl/5.8.8 /Library/Perl/5.8.8/darwin-thread-multi-2level /Library/Perl/5.8.8 /Library/Perl /Network/Library/Perl/5.8.8/darwin-thread-multi-2level /Network/Library/Perl/5.8.8 /Network/Library/Perl /System/Library/Perl/Extras/5.8.8/darwin-thread-multi-2level /System/Library/Perl/Extras/5.8.8 /Library/Perl/5.8.6/darwin-thread-multi-2level /Library/Perl/5.8.6 /Library/Perl/5.8.1 .
Subject: Re: [rt.cpan.org #48604] IO::File->new() doesn't obey Unicode settings
Date: Tue, 11 Aug 2009 09:35:05 -0500
To: bug-IO [...] rt.cpan.org
From: Graham Barr <gbarr [...] pobox.com>
Download (untitled) / with headers
text/plain 251b
Yes IO::File does eventually call open() It seems the effect of -C is lexical to the main script $ cat Foo.pm open($f, "< /tmp/testfile.txt") or die $!; $line=<$f>; print "is utf8: ",utf8::is_utf8($line); $ perl -Cio -I. -l -MFoo -e1 is utf8:
Download (untitled) / with headers
text/plain 229b
On Tue Aug 11 10:35:32 2009, gbarr@pobox.com wrote: Show quoted text
> It seems the effect of -C is lexical to the main script
Oh, how horrible. I guess a -C doc patch or behavior patch is in order, then. Thanks for finding the problem. -Ken


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.