Select Code to Download

@foo = (1,2,3);
process_array(@foo);
...
    $var3 = shift;    # $var3 will only get '3'.

}

sub process_array {
    @args = @_;

}

sub process_array {
    $args = \@_;

}