perl-IO-Interactive-1.022-bp153.1.14 RPM for noarch

From OpenSuSE Leap 15.3 for noarch

This module provides three utility subroutines that make it easier to
develop interactive applications...

* 'is_interactive()'

This subroutine returns true if '*ARGV' and the currently selected
filehandle (usually '*STDOUT') are connected to the terminal. The test is
considerably more sophisticated than:

    -t *ARGV && -t *STDOUT

as it takes into account the magic behaviour of '*ARGV'.

You can also pass 'is_interactive' a writable filehandle, in which case it
requires that filehandle be connected to a terminal (instead of the
currently selected). The usual suspect here is '*STDERR':

    if ( is_interactive(*STDERR) ) {
        carp $warning;
    }

* 'interactive()'

This subroutine returns '*STDOUT' if 'is_interactive' is true. If
'is_interactive()' is false, 'interactive' returns a filehandle that does
not print.

This makes it easy to create applications that print out only when the
application is interactive:

    print {interactive} "Please enter a value: ";
    my $value = <>;

You can also pass 'interactive' a writable filehandle, in which case it
writes to that filehandle if it is connected to a terminal (instead of
writing to '*STDOUT'). Once again, the usual suspect is '*STDERR':

    print {interactive(*STDERR)} $warning;

* 'busy {...}'

This subroutine takes a block as its single argument and executes that
block. Whilst the block is executed, '*ARGV' is temporarily replaced by a
closed filehandle. That is, no input from '*ARGV' is possible in a 'busy'
block. Furthermore, any attempts to send input into the 'busy' block
through '*ARGV' is intercepted and a warning message is printed to
'*STDERR'. The 'busy' call returns a filehandle that contains the
intercepted input.

A 'busy' block is therefore useful to prevent attempts at input when the
program is busy at some non-interactive task.

Provides

• perl-IO-Interactive
• perl(IO::Interactive)

Requires

• perl(:MODULE_COMPAT_5.26.1)
• rpmlib(CompressedFileNames) <= 3.0.4-1
• rpmlib(FileDigests) <= 4.6.0-1
• rpmlib(PayloadFilesHavePrefix) <= 4.0-1
• rpmlib(PayloadIsXz) <= 5.2-1

License

Artistic-1.0 or GPL-1.0+

Changelog

* Mon Sep 05 2016 coolo@suse.com
  - updated to 1.022
    see /usr/share/doc/packages/perl-IO-Interactive/Changes
* Sun Feb 07 2016 coolo@suse.com
  - updated to 1.021
    see /usr/share/doc/packages/perl-IO-Interactive/Changes
* Fri Nov 18 2011 coolo@suse.com
  - use original .tar.gz
* Mon Jan 17 2011 coolo@novell.com
  - initial package 0.0.6
    * created by cpanspec 1.78.03

Files

/usr/lib/perl5/vendor_perl/5.26.1/IO
/usr/lib/perl5/vendor_perl/5.26.1/IO/Interactive.pm
/usr/lib/perl5/vendor_perl/5.26.1/x86_64-linux-thread-multi
/usr/share/doc/packages/perl-IO-Interactive
/usr/share/doc/packages/perl-IO-Interactive/Changes
/usr/share/doc/packages/perl-IO-Interactive/LICENSE
/usr/share/doc/packages/perl-IO-Interactive/examples
/usr/share/doc/packages/perl-IO-Interactive/examples/interactive.pl
/usr/share/doc/packages/perl-IO-Interactive/examples/memory_test.pl
/usr/share/man/man3/IO::Interactive.3pm.gz

Generated by rpm2html 1.8.1

Fabrice Bellet, Tue Apr 9 14:50:04 2024