perl-IO-Interactive-1.025-lp160.1.1 RPM for noarch

From OpenSuSE Leap 16.0 for noarch

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

The 'ARGV' filehandle, the one that '<>' or an empty 'readline()' uses, has
various magic associated with it. It's not actually opened until you try to
read from it. Checking '-t ARGV' before you've tried to read from it might
give you the wrong answer. Not only that, you might not read from 'ARGV'.
If the value in '@ARGV' is the magic filename '-' (a convention to mean the
standard filehandle for input or output), 'ARGV' might actually be 'STDIN'.
You don't want to think about all of this. This module is discussed in
_Perl Best Practices_ on page 218. Also see the 'ARGV' entry in perlvar and
the 'readline' entry in perlfunc.

* '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;
    }

Note that 'is_interactive' may return true in a Windows Scheduled Task. See
Github #6 (https://github.com/briandfoy/io-interactive/issues/6).

* '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.38.2)
• rpmlib(CompressedFileNames) <= 3.0.4-1
• rpmlib(FileDigests) <= 4.6.0-1
• rpmlib(PayloadFilesHavePrefix) <= 4.0-1
• rpmlib(PayloadIsZstd) <= 5.4.18-1

License

Artistic-2.0

Changelog

* Thu Jul 06 2023 Tina Müller <timueller+perl@suse.de>
  - updated to 1.025
    see /usr/share/doc/packages/perl-IO-Interactive/Changes
    1.025 2023-07-05T15:01:36Z
    * Remove unnecessary -T from pod tests now that v5.38 allows you to
    compile a perl without taint support. Those perls will refuse to run
    the programs using -T.
* Thu Feb 04 2021 Tina Müller <timueller+perl@suse.de>
  - updated to 1.023
    see /usr/share/doc/packages/perl-IO-Interactive/Changes
    1.023 2021-02-03T22:37:57Z
    * Explain why ARGV is a problem (Github #9)
    * Freshen distro, remove Travis CI, add Github Actions
* 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.38.2/IO
/usr/lib/perl5/vendor_perl/5.38.2/IO/Interactive.pm
/usr/share/doc/packages/perl-IO-Interactive
/usr/share/doc/packages/perl-IO-Interactive/Changes
/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/licenses/perl-IO-Interactive
/usr/share/licenses/perl-IO-Interactive/LICENSE
/usr/share/man/man3/IO::Interactive.3pm.gz

Generated by rpm2html 1.8.1

Fabrice Bellet, Mon Jan 20 23:31:59 2025