perl - 为什么这个 Perl 代码在 shell 中运行，而不是在脚本中运行？

Question

我有一个简单的问题。我一直在使用 zoidberg perl shell 以交互方式熟悉 perl。我喜欢在充实脚本之前能够即时测试我的东西。 (我是初学者。)

我的问题是，在 shell 中我可以执行以下操作:

@a = `df -h | grep /dev/mapper | cut -c 48-`

for $i (@a) { @b=`ls $i` }
print @b;

但是，当我把它放在 linux 的脚本中时:

#!/bin/perl

我在运行脚本时看到以下错误:

syntax error at perl_diskstats.perl line 5, near "$i ( "
Execution of perl_diskstats.perl aborted due to compilation errors.

我在这里做的事情很明显吗？我到底做错了什么？我以为格式是..

foreach $var (@array) { codeblock }

……对吧？

Answer 1

您在第一行末尾缺少一个分号。