http://www.perlmonks.org?node_id=516489


in reply to Unix text-mode CB Client

Nice program, but it echoes the password in clear-text when you type it on the term console ... i suggest to add 'ReadMode' func: 
use Term::ReadKey qw(GetTerminalSize ReadMode);

[download]
and change the line 191 for this one: 
print "Enter your password: "; ReadMode 2; chomp($pass=<STDIN>); ReadM
+ode 0;

[download]

happy chatterboxing! ^_^

perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"'

In Section Craft