Select Code to Download

sub some_function {
  my $arg1 = shift;         # shift the first value off of @_
...

# called like this
$value = some_function( 1, 2, 3 );