I am seeing "strange" behaviour when trying to grab user input within Curses v1.32.

I have created a small window and put some text in it, then drawn a box around the window - this works fine until I add the code to get input from the user, after which the box is no longer drawn.

I have seen this on Debian Jessie, Debian Lenny and RHEL-6.

Below is a small code example displaying this behaviour. If you run this code without args a box is drawn around the window. Provide an arg to the script so user input is sought and the box is no longer drawn around the window.

Any Curses guru's shed any light on this for me?

#!/usr/bin/perl
use strict;
use warnings;

use Curses;

END{ endwin(); };

initscr;
curs_set(0);
clear();
noecho();
halfdelay(30);

my $win1 = Curses->new( 7, 30, 5, 5);
$win1->box(ACS_VLINE, ACS_HLINE);

my $char = -1;

while(1) {
        $win1->addstr( 2, 2, scalar(localtime));
        $win1->addstr( 4, 10, "Char: $char ");
        $win1->refresh;

        if(!@ARGV) {
                sleep 3;
        } else {
                $char = getch();
        }
}

[download]

Thanks

Duncs

In reply to Strange Curses behaviour by duncs

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.