帮忙看看 非常感谢

帮忙看看 非常感谢
我的程序为：
#!/usr/bin/perl
print "输入一个数字:.\n";
$mnu= <STDIN> ;
print"输入一串字符串；.\n";
chomp($string=<STDIN>);
$result=$string x $mnu
print "$result.\n";
为什么运行会说
syntax error at 3 line 7, near "$mnu
print"
Execution of 3 aborted due to compilation errors.

在给看看这个
#!/usr/bin/perl
print "enter some lines :";
print reserve <STDIN> ;
为什么只是输入 不输出呢

还有一个问题
想输入数字从而输出相应的名字：
#!usr/bin/perl -w
@num = <STDIN>;
@MANE= qw /yang yan xin gong zhu zhao lei liu wu deng /;
foreach $num(@num){
print "$MANE[$_-1]\n";}
运行后为什么会是这样的 输入的是 1 和4
1 4
Use of uninitialized value in subtraction (-) at 2 line 5, <STDIN> line 1.
deng

[quote]回复给 yzqiang : .

回复给 yzqiang : 帮忙看看 非常感谢...

$result=$string x $mnu

缺少分号

帮忙看看 第2 和第3个问题
谢谢

第三个问题：--foreach .
第三个问题：
foreach $num(@num){
print "$MANE[$_-1]\n";}
$num和这个有冲突！！
可以这样：
foreach (@num){
print "$MANE[$_-1]\n";}
呵呵1

读小骆驼。--foreach 的.
读小骆驼。
foreach 的循环变量只有缺省时才是 $_，你既然指定了 $num，就不能再用 $_ 了。
这种语法上的细节仔细看一遍书就搞定了，上论坛问反而效率不高。
苦口婆心告诉你真理吧，你又觉得我是懒得回答你的问题才这么说。
正所谓良药苦口利于病，忠言逆耳利于行。
我言尽于此，听不听就看你的了。