sub mysub
{
   $foo ++;
   some_other_sub($bar);
}

##</code><code>##

sub mysub
{
   my ($foo, $bar) = @_;
   #do stuff with $foo and $bar
}

##</code><code>##

sub mysub
{
   my ($foo, $bar) = @ARGV;
   #do stuff with $foo and $bar
}