Skip Menu |

This queue is for tickets about the Shell-POSIX-Select CPAN distribution.

Report information
The Basics
Id: 53556
Status: open
Priority: 0/
Queue: Shell-POSIX-Select

People
Owner: Nobody in particular
Requestors: l.butler [...] ed.ac.uk
Cc:
AdminCc:

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



Subject: select + format + empty lines
Date: Sat, 9 Jan 2010 23:00:25 +0000 (GMT)
To: bug-Shell-POSIX-Select [...] rt.cpan.org
From: Leo Butler <l.butler [...] ed.ac.uk>
There is a conflict between Shell::POSIX::Select and empty lines following a format definition. Here is an example: #!/usr/bin/perl use Shell::POSIX::Select; &print_count(); sub nll() { 0; }; { our $count; format STDOUT = ^<<< $count . sub print_count() { $count=0; select(STDOUT); write(STDOUT); }; }; The error message one gets is Unterminated <> operator at /home/work/lib/perl/select-bug.pl line 24. If one eliminates the empty line 24, this script runs without fault. ------------------------ OS: debian lenny 5.03 # apt-cache showpkg libshell-posix-select-perl Package: libshell-posix-select-perl Versions: 0.05-1.2 (/var/lib/dpkg/status) Description Language: File: /var/lib/dpkg/status MD5: 05c7d49ccad6e73447892d1f2afdbcca Reverse Depends: Dependencies: 0.05-1.2 - perl (2 5.6.0-16) Provides: 0.05-1.2 - Reverse Provides: # uname -a Linux lenneee 2.6.26-1-686 #1 SMP Fri Mar 13 18:08:45 UTC 2009 i686 GNU/Linux -- The University of Edinburgh is a charitable body, registered in Scotland, with registration number SC005336.
Subject: Re: [rt.cpan.org #53556] select + format + empty lines
Date: Sat, 9 Jan 2010 15:39:13 -0800
To: Leo Butler via RT <bug-Shell-POSIX-Select [...] rt.cpan.org>
From: Tim Maher <tim [...] consultix-inc.com>
Thanks for the info, Leo! I'll look into this soon. Tim *----------------------------------------------------------------------* | Tim Maher, PhD (206) 781-UNIX http://www.consultix-inc.com | | tim at ( TeachMePerl, TeachMeLinux, or TeachMeUnix ) dot Com | *-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+- | > "Minimal Perl for UNIX People" has been an Amazon Best Seller! < | | * Download chapters, read reviews, and order at: MinimalPerl.com * | *----------------------------------------------------------------------* On Sat, Jan 09, 2010 at 06:07:08PM -0500, Leo Butler via RT opined thusly: Show quoted text
> Sat Jan 09 18:06:57 2010: Request 53556 was acted upon. > Transaction: Ticket created by l.butler@ed.ac.uk > Queue: Shell-POSIX-Select > Subject: select + format + empty lines > Broken in: (no value) > Severity: (no value) > Owner: Nobody > Requestors: l.butler@ed.ac.uk > Status: new > Ticket <URL: http://rt.cpan.org/Ticket/Display.html?id=53556 > > > > There is a conflict between Shell::POSIX::Select and empty lines > following a format definition.
Show quoted text
> Here is an example: > > #!/usr/bin/perl > use Shell::POSIX::Select; > &print_count(); > > sub nll() > { > 0; > }; > > { > our $count; > format STDOUT = > ^<<< > $count > . > sub print_count() > { > $count=0; > select(STDOUT); > write(STDOUT); > }; > }; > > > The error message one gets is > Unterminated <> operator at /home/work/lib/perl/select-bug.pl line 24. > > If one eliminates the empty line 24, this script runs without fault. > > > ------------------------ > OS: debian lenny 5.03 > > # apt-cache showpkg libshell-posix-select-perl > Package: libshell-posix-select-perl > Versions: > 0.05-1.2 (/var/lib/dpkg/status) > Description Language: > File: /var/lib/dpkg/status > MD5: 05c7d49ccad6e73447892d1f2afdbcca > > > Reverse Depends: > Dependencies: > 0.05-1.2 - perl (2 5.6.0-16) > Provides: > 0.05-1.2 - > Reverse Provides: > # uname -a > Linux lenneee 2.6.26-1-686 #1 SMP Fri Mar 13 18:08:45 UTC 2009 i686 GNU/Linux > > -- > The University of Edinburgh is a charitable body, registered in > Scotland, with registration number SC005336. >