提示“Undefined subroutine &main”错误怎么回事？

bittony

按照论坛上的帖子写一个取得密码的perl程序。
我的perl的源码如下：
#!/usr/bin/perl
srand (time());
my $randletter = "(int (rand (26)) + (int (rand (1) + .5) % 2 ? 65 : 97))";
my $salt = sprintf ("%c%c", eval $randletter, eval $randletter);
my $plaintext = shift;
my $crypttext = crypt ($plaintext, $salt);
print "${crypttext}\n";

可是运行时提示：
Undefined subroutine &main::sarnd called at passwdgen.pl line 2.
是怎么回事，我第一次用perl不清楚，大家帮我看看！

bittony

原来是srand写成sarnd了。
可是我输入perl passwdgen.pl "123456"并没有输出东西，只是有一个回车换行？我哪儿写的不对吗？