Help for this page

Select Code to Download

Select or download this

#!/path/to/perl -w
use strict;
...
print "Your Username is: $uname"; #print it out
print "password:";
chomp($passwd = <STDIN>);

Select or download this

#!/path/to/perl -w
use strict;
...
chomp($passwd = <STDIN>);

system("/path/to/prog", "$uname", "$passwd");