Advanced Search

Return to Snippet

Revision: 299
at July 8, 2006 21:10 by kkindoh
Initial Code 
## Under UNIX encironment
##
use Term::ReadKey;
my $hsize= ( Term::ReadKey::GetTerminalSize( \*STDOUT)) [0];

#--------------------------------------------------------------
## Under Windows environment
##
use Win32::Console;
my $cons= Win32::Console->new();
my $hsize= ( $cons->Info()) [0];
Initial URL 









Initial Description





Does not work under emacs shell mode









Initial Title





How to get screen size









Initial Tags














Initial Language





Perl