Skip Menu |
 

This queue is for tickets about the App-Cleo-Patra CPAN distribution.

Report information
The Basics
Id: 127078
Status: open
Priority: 0/
Queue: App-Cleo-Patra

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

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



Subject: Fails with perl < 5.22
Download (untitled) / with headers
text/plain 741b
As per subject. Best illustrated with the matrix: http://matrix.cpantesters.org/?dist=App-Cleo-Patra%200.001 Sample fail report: http://www.cpantesters.org/cpan/report/4884e6b0-b1ff-11e8-a6f7-dd1706c27539 Diagnostics: Unknown warnings category 'redundant' at /home/cpansand/.cpan/build/2018090614/App-Cleo-Patra-0.001-2/blib/lib/App/Cleo/Patra.pm line 95. The referenced line as link: https://metacpan.org/source/BORISD/App-Cleo-Patra-0.001/lib/App/Cleo/Patra.pm#L95 Potential idiomatic workaround could be the if module that comes with perl. Something like this: my $HAS_WARNINGS_REDUNDANT; BEGIN { $HAS_WARNINGS_REDUNDANT = eval q{ use warnings "redundant"; 1 }; } no if $HAS_WARNINGS_REDUNDANT, warnings => 'redundant';
Download (untitled) / with headers
text/plain 1.1k
Thank you for your report. This code was not written by me, so I had to look a bit... The problem seems the be the use of "sprintf" with two arguments, witch is the reason for using no "warnings 'redundant'"; print sprintf $self->{$prompt_state}, $i; I will maybe try to change this code, instead of the proposed "workaround of the workaround". Thank you Am So 09. Sep 2018, 08:30:23, ANDK schrieb: Show quoted text
> As per subject. Best illustrated with the matrix: > http://matrix.cpantesters.org/?dist=App-Cleo-Patra%200.001 > > Sample fail report: http://www.cpantesters.org/cpan/report/4884e6b0- > b1ff-11e8-a6f7-dd1706c27539 > > Diagnostics: Unknown warnings category 'redundant' at > /home/cpansand/.cpan/build/2018090614/App-Cleo-Patra-0.001- > 2/blib/lib/App/Cleo/Patra.pm line 95. > > The referenced line as link: https://metacpan.org/source/BORISD/App- > Cleo-Patra-0.001/lib/App/Cleo/Patra.pm#L95 > > Potential idiomatic workaround could be the if module that comes with > perl. Something like this: > > my $HAS_WARNINGS_REDUNDANT; > BEGIN { > $HAS_WARNINGS_REDUNDANT = eval q{ use warnings "redundant"; 1 }; > } > no if $HAS_WARNINGS_REDUNDANT, warnings => 'redundant';


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.