Perl(3) User Contributed Perl Documentation Perl(3)NAMETerm::Size::Perl - Perl extension for retrieving terminal size (Perl
version)
SYNOPSIS
use Term::Size::Perl;
($columns, $rows) = Term::Size::Perl::chars *STDOUT{IO};
($x, $y) = Term::Size::Perl::pixels;
DESCRIPTION
Yet another implementation of "Term::Size". Now in pure Perl, with the
exception of a C probe run on build time.
FUNCTIONS
chars
($columns, $rows) = chars($h);
$columns = chars($h);
"chars" returns the terminal size in units of characters
corresponding to the given filehandle $h. If the argument is
ommitted, *STDIN{IO} is used. In scalar context, it returns the
terminal width.
pixels
($x, $y) = pixels($h);
$x = pixels($h);
"pixels" returns the terminal size in units of pixels corresponding
to the given filehandle $h. If the argument is ommitted,
*STDIN{IO} is used. In scalar context, it returns the terminal
width.
Many systems with character-only terminals will return "(0, 0)".
SEE ALSO
It all began with Term::Size by Tim Goodwin. You may want to have a
look at:
Term::Size
Term::Size::Unix
Term::Size::Win32
Term::Size::ReadKey
It would be helpful if you send me the Params.pm generated by the probe
at build time. Please reports bugs via CPAN RT,
http://rt.cpan.org/NoAuth/Bugs.html?Dist=Term-Size-Perl
BUGS
I am having some hard time to make tests run correctly under the "cpan"
script. Some Unix systems do not seem to provide a working tty inside
automatic installers. I think it needs some skip tests, but I am yet
not sure what should be the portable tests for this.
Update: This distribution uses new tests to skip if filehandle is not a
tty. It was noticed that "Test::Harness" and "prove", for instance,
provide a non-tty STDOUT to the test script and automatic installers
could provide a non-tty STDIN. So the former tests were basically
wrong. I am improving my understanding of the involved issues and I
hope to soon fix the tests for all of Term::Size modules.
AUTHOR
A. R. Ferreira, <ferreira@cpan.org>
COPYRIGHT AND LICENSE
Copyright (C) 2006-2007 by A. R. Ferreira
This library is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
perl v5.14.1 2007-03-11 Perl(3)