OO Curses Messes Up Console on Exit

dvergin has asked for the wisdom of the Perl Monks concerning the following question:

I have a command line tool that needs to be take on a spiffed-up UI. So I figured this would be a good time to get to know Curses.

The following script works as desired. It clears the screen, displays "foo" in the appropriate place. And then restores the console screen as it was before the program ran.

#!/usr/bin/perl -w
use strict;
use Curses;

initscr();
addstr(10, 10, "foo");
refresh();
sleep 2;
endwin();
[download]

On the other hand, this next script is less well-behaved. After displaying "foo" and waiting 2 seconds, it complains "Curses function 'endwin' called with too many arguments at ./curses.pl line 10." and then leaves the console session in what I would describe as no_echo, no_eol mode (blindly typing 'ls -l' gives me a dir listing with no eol chars).

#!/usr/bin/perl -w
use strict;
use Curses;

initscr();           # omit this line for same result
my $win = new Curses;
#$win->initscr();    # including this causes no display
$win->addstr(10, 10, 'foo');
$win->refresh();
sleep 2;
$win->endwin();
[download]

I would be glad for...

An explanation of why script #2 is messing up
A clue as to how to fix it
A reference to some docs that really explain the various Curses functions and how to use this module's OO style properly. (I have read 'perldoc Curses' and 'man Curses' as well as several Googled pages and just get the run-around.)

TIA,
David

Comment on OO Curses Messes Up Console on Exit Select or Download Code

Replies are listed 'Best First'.
Re: OO Curses Messes Up Console on Exit by Paladin (Vicar) on Jan 20, 2003 at 05:15 UTC
When I was messing around with Curses, I used the C docs, the Perl docs, and mostly just played around and tested things. One thing I used that was handy was: `END { endwin(); }` [download] at the top of my script, so if the script died for some reason (ie. SIGINT, die, etc.) instead of finishing properly `endwin()` would still be called and not mess up my display.	[reply] [d/l] [select]
Re: OO Curses Messes Up Console on Exit by jepri (Parson) on Jan 20, 2003 at 04:57 UTC
Change `$win->endwin();` to `endwin();` The curses library itself is not OO, but the perl wrapper is. Clearly the two aren't sitting quite right. update: There are no good docs for curses. You kinda have to guess a lot. Reading the examples is about the best way to do it. And you have it easy - the C docs are much worse. ____________________ Jeremy I didn't believe in evil until I dated it.	[reply] [d/l] [select]


Problems? Is your data what you think it is?
	PerlMonks