Mega Code Archive

 

Categories / Perl / System Functions

 

Get Terminal Size

use Term::ReadKey; ($widthchars, $heightchars, $widthpixels, $heightpixels) = GetTerminalSize(); print "Your screen is $heightpixels x $widthpixels pixels.";