Skip Menu |

This queue is for tickets about the Devel-DProfLB CPAN distribution.

Report information
The Basics
Id: 86746
Status: new
Priority: 0/
Queue: Devel-DProfLB
People
Owner: Nobody in particular
Requestors: kes-kes [...] yandex.ru
Cc:
AdminCc:
Bug Information
Severity: (no value)
Broken in: 0.01
Fixed in: (no value)

History Show all quoted text
  Sat Jul 06 06:46:47 2013 kes-kes [...] yandex.ru - Ticket created
# perl -d:DProfLB tes4.pl String found where operator expected at (eval 3)[/home/adm/perl5/lib/perl5/Devel/DProfLB.pm:225] line 2, near "croak 'usage: $io->getline()'" (Do you need to predeclare croak?) String found where operator expected at (eval 3)[/home/adm/perl5/lib/perl5/Devel/DProfLB.pm:225] line 8, near "croak 'usage: $io->getlines()'" (Do you need to predeclare croak?) String found where operator expected at (eval 3)[/home/adm/perl5/lib/perl5/Devel/DProfLB.pm:225] line 10, near "croak 'Can\'t call $io->getlines in a scalar context, use $io->getline'" (Do you need to predeclare croak?) syntax error at (eval 3)[/home/adm/perl5/lib/perl5/Devel/DProfLB.pm:225] line 2, near "croak 'usage: $io->getline()'" syntax error at (eval 3)[/home/adm/perl5/lib/perl5/Devel/DProfLB.pm:225] line 8, near "croak 'usage: $io->getlines()'" syntax error at (eval 3)[/home/adm/perl5/lib/perl5/Devel/DProfLB.pm:225] line 10, near "croak 'Can\'t call $io->getlines in a scalar context, use $io->getline'" Compilation failed in require at /usr/local/lib/perl5/5.16.0/mach/IO/Seekable.pm line 101. BEGIN failed--compilation aborted at /usr/local/lib/perl5/5.16.0/mach/IO/Seekable.pm line 101. Compilation failed in require at /usr/local/lib/perl5/5.16.0/mach/IO/File.pm line 133. BEGIN failed--compilation aborted at /usr/local/lib/perl5/5.16.0/mach/IO/File.pm line 133. Compilation failed in require at /usr/local/lib/perl5/site_perl/5.16.0/Modern/Perl.pm line 16. BEGIN failed--compilation aborted at /usr/local/lib/perl5/site_perl/5.16.0/Modern/Perl.pm line 16. Compilation failed in require at tes4.pl line 3. BEGIN failed--compilation aborted at tes4.pl line 3. # cat tes4.pl #!/usr/bin/perl use Modern::Perl; use Data::Dumper; my $a = ['ns1', 'ns2']; print "YES" if $a ~~ ['ns1', 'ns2'];