Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^2: Weird Term::Prompt behaviour

by gargle (Hermit)
on Sep 18, 2012 at 12:45 UTC ( #994283=note: print w/replies, xml ) Need Help??


in reply to Re: Weird Term::Prompt behaviour
in thread Weird Term::Prompt behaviour

Sorry, I forgot to mention that I did try $|=1 already. It doesn't work!

[gargle@vlds204 reporting]$ cat test.pl #!/usr/bin/perl use Modern::Perl; use Term::Prompt; my $mypass = prompt( 'x', "password:", '', '' ); $|=1; say "alfa"; say "beta"; [gargle@vlds204 reporting]$ ./test.pl | tee test.txt x password: alfabeta[gargle@vlds204 reporting]$ ./test.pl password: x alfa beta [gargle@vlds204 reporting]$

I'm starting to think my perl install is messed up. Are there any unit tests I can run?

--
if ( 1 ) { $postman->ring() for (1..2); }

Replies are listed 'Best First'.
Re^3: Weird Term::Prompt behaviour
by Anonymous Monk on Sep 20, 2012 at 07:34 UTC

    Sorry, I forgot to mention that I did try $|=1 already. It doesn't work!

    Doesn't work how? What is it you're expecting to happen that didn't happen?

    I'm starting to think my perl install is messed up.

    I doubt your install is messed up. You could try export  TERM=dumb   test.pl

    Are there any unit tests I can run?

    Sure, but they're not usually installed. You could verify your install with perlivp, but I doubt that'll help with this problem.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://994283]
help
Chatterbox?
[marto]: Corion Depeche mode were great last night
[Corion]: marto: Whooo! ;) That gives me hope for the large-stadium experience ;)

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (12)
As of 2017-03-27 11:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Should Pluto Get Its Planethood Back?



    Results (319 votes). Check out past polls.