Skip Menu |
 
Update: The rt.cpan.org bug tracker service is no longer shutting down.

This queue is for tickets about the IO-Prompt CPAN distribution.

Report information
The Basics
Id: 42681
Status: new
Priority: 0/
Queue: IO-Prompt

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

Bug Information
Severity: Important
Broken in: v0.99.4
Fixed in: (no value)



Subject: Fix for " Use of uninitialized value $_ in pattern match (m//)"
Download (untitled) / with headers
text/plain 292b
When pragma "warnings" and "-w" are enabled while calling propmpt() there are warnings like : Use of uninitialized value $_ in pattern match (m//) at .../lib/IO/Prompt.pm line 91. Run attached "test-IO-Prompt.pl" for demonstration of issue. Patch is attached in the file "patch-Prompt.pm".
Subject: patch-Prompt.pm
Download patch-Prompt.pm
text/x-perl 284b
--- Prompt.pm +++ Prompt.pm @@ -88,6 +88,7 @@ @data = map { $flags_alias{$_} || $_ } @data; for (my $i = 0 ; $i < @data ; $i++) { local *_ = \($data[$i]); + next unless defined $_; if (ref eq 'HASH') { splice @data, $i + 1, 0, %$_; }
Subject: test-IO-Prompt.pl
Download test-IO-Prompt.pl
text/x-perl 119b
#!/usr/bin/perl -Tw use strict; use warnings; use IO::Prompt; my $res = prompt( -prompt => "Enter something:");


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.