Select Code to Download

sub add {
  return shift() + shift();
}

sub add {
  return $_[0] + $_[1];
...
  my ( $left, $right ) = @_;
  return $left + $right;
}

my $size = length( $some_string );

sub mylength {
  my $string = shift;
...
my $length = mylength("Hello world.");

# $length now holds 12.