スクリプト言語と開発効率について

例えば、
use strict;

sub foo {
my $arg = shift;
print "$arg\n";
}

sub bar {
print "$arg\n";
}

foo('hello');

は、実行しようとするとコンパイルエラーが起きちゃう。bar関数で不正に$arg使ってるから。