my $foo = $query->param('foo');

bar();

sub bar {
  print $foo;
}

##</code><code>##

my $foo = $query->param('foo');

bar($foo);

sub bar {
  my $foo = shift;
  print $foo;
}