Forums
New posts
Search forums
Members
Current visitors
Log in
Register
What's new
Search
Search
Search titles only
By:
New posts
Search forums
Menu
Log in
Register
Install the app
Install
Forums
Archive
Archive
Perl
Perl Misc
Problem with Win32::Console and END block.
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Reply to thread
Message
[QUOTE="Richard S Beckett, post: 4750678"] I want to set my dos window up with 80 cols and 100 lines, but when I do I break my END block. Here's an example... 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 or 3 (commented) lines, and the PRINT statement in the END block stops working. The <STDIN> still works, though. What am I doing wrong _this_ time? ;-) W2K, active perl V5.8.1 build 807. Thanks. [/QUOTE]
Verification
Post reply
Forums
Archive
Archive
Perl
Perl Misc
Problem with Win32::Console and END block.
Top