2008-04-04 15.4 端末またはウィンドウのサイズを判定する Perl Cookbook CPANのTerm::ReadKeyモジュールを使用する。 use Term::ReadKey; ($wchar, $hchar, $wpixels, $hpixels) = GetTerminalSize();