Imported Upstream version 0.004009
Salvatore Bonaccorso
10 years ago
| 127 | 127 |
(thanks, Bas)
|
| 128 | 128 |
|
| 129 | 129 |
* Attempted to mollify cpanm by moving $VERSION declaration
|
|
130 |
|
|
131 |
|
|
132 |
0.004009 Wed Oct 2 21:55:06 2013
|
|
133 |
|
|
134 |
* Further improvements under 5.18
|
|
135 |
(thanks, Gareth)
|
|
136 |
|
| 0 | 0 |
--- #YAML:1.0
|
| 1 | 1 |
name: IO-Prompter
|
| 2 | |
version: 0.004008
|
|
2 |
version: 0.004009
|
| 3 | 3 |
abstract: Prompt for input, read it, clean it, return it.
|
| 4 | 4 |
author:
|
| 5 | 5 |
- Damian Conway <DCONWAY@CPAN.org>
|
| 0 | |
IO::Prompter version 0.004008
|
|
0 |
IO::Prompter version 0.004009
|
| 1 | 1 |
|
| 2 | 2 |
Prompt for, read, vet, chomp, and encapsulate input.
|
| 3 | 3 |
Like so:
|
| 1 | 1 |
package IO::Prompter;
|
| 2 | 2 |
|
| 3 | 3 |
use warnings;
|
| 4 | |
no if $] >= 5.018000, warnings => 'experimental::smartmatch';
|
|
4 |
no if $] >= 5.018000, warnings => 'experimental';
|
| 5 | 5 |
use strict;
|
| 6 | 6 |
use Carp;
|
| 7 | 7 |
use Contextual::Return;
|
| 8 | 8 |
use Scalar::Util qw< openhandle looks_like_number >;
|
| 9 | 9 |
use Symbol qw< qualify_to_ref >;
|
| 10 | 10 |
|
| 11 | |
our $VERSION = '0.004008';
|
|
11 |
our $VERSION = '0.004009';
|
| 12 | 12 |
|
| 13 | 13 |
my $fake_input; # Flag that we're faking input from the source
|
| 14 | 14 |
|
|
| 1680 | 1680 |
|
| 1681 | 1681 |
=head1 VERSION
|
| 1682 | 1682 |
|
| 1683 | |
This document describes IO::Prompter version 0.004008
|
|
1683 |
This document describes IO::Prompter version 0.004009
|
| 1684 | 1684 |
|
| 1685 | 1685 |
|
| 1686 | 1686 |
=head1 SYNOPSIS
|