Select Code to Download

#!/usr/bin/perl -w
#didn't use strict, to make the example clearer.
...
}

print "$foo\n";    # prints 3.

#!/usr/bin/perl -w
use strict;    #<- very important.
...
}
print "$bar\n"; # <- compiler gives error.$bar does not exsist (kind o
+f).
print "$foo\n";    # you get 3.

s/compiler/interpreter/ig;