Select Code to Download

Loading internal logger. Log::Log4perl recommended for better logging
Unable to get Terminal Size. The Win32 GetConsoleScreenBufferInfo call
+ didn't work. The COLUMNS and LINES environment variables didn't work
+. at C:\Strawberry\perl\vendor\lib/Term/ReadLine/readline.pm line 410
+.

...
Enter 'h' for help.

cpan>

t/026FileApp.t ............ 1/27
#   Failed test 'header_text'
#   at t/026FileApp.t line 459.
...
t/026FileApp.t ............ Dubious, test returned 1 (wstat 256, 0x100
+)

sub get_window_size
{
...
    my ($num_cols,$num_rows);

    if (defined $term_readkey) {