Question for PERL

Q:
I need to know how to make the input character on screen display invisible
in my perl program.
something like when i key in my password through keyboard, but the
characters i key in are not visible.
for your information i am now working on UNIX os, and using the program
Perl version 5.
Thank you for your time.
A:
print "Please enter your password: ''";
system("stty -echo");
chop($password=<>);
print "$password\n";
system("stty echo");