Does anyone know a way around this one. I want to set my dos window up with
80 cols and 100 lines, but when I do I break my END block.
use strict;
use warnings;
$| =1;
# use Win32::Console;
# my $BUFFER = new Win32::Console(STD_OUTPUT_HANDLE);
# $BUFFER->Size(80,100);
for (1..5) {print "."; sleep 1}
exit;
END {print "\n\nPress Enter\n"; <STDIN>;}
In the above form it works. BUT remove the comments from the first 2
(commented) lines, and the PRINT statement in the END block stops working.
The <STDIN> still works, though.
I _can't_ have the syntax wrong this time, Shirley?
W2K, V5.8.1 build 807.
Thanks.
R.
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
