Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: printing hash values and keys from user

by liverpole (Monsignor)
on Nov 01, 2010 at 18:22 UTC ( #868840=note: print w/replies, xml ) Need Help??


in reply to printing hash values and keys from user

Hi pinnacle,

Yes, it's because you are using a key that has a newline on it.

Try doing:

my $type = <stdin>; chomp $type;

before using the key.


s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/