use strict;
use warnings;

sub foo {return 'foo';}

die "No bar here" if bar () ne 'bar';
print foo () . "\n";
print bar () . "\n";

sub bar {return 'bar';}

##</code><code>##

Unquoted string "bar" may clash with future reserved word at noname.pl line 8.
foo
Use of uninitialized value in concatenation (.) or string at noname.pl line 8.
print() on unopened filehandle bar at noname.pl line 8.