On Aug 9, [EMAIL PROTECTED] said:
my $pwd = $1;
my $seed = $2;
That's shell syntax, Derrick. Perl's command-line arguments are stored in
@ARGV.
my ($pwd, $seed) = @ARGV;
or
my $pwd = $ARGV[0];
my $seed = $ARGV[1];
my $key = substr(crypt("$pwd","$seed"),2);
Those quotes around $pwd and $seed are unnecessary.
--
Jeff "japhy" Pinyan % How can we ever be the sold short or
RPI Acacia Brother #734 % the cheated, we who for every service
http://japhy.perlmonk.org/ % have long ago been overpaid?
http://www.perlmonks.org/ % -- Meister Eckhart
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
