Select Code to Download

do_stuff($foo, $bar, $foo_too, $bar_too, $foo_who_poo);

sub do_stuff {
   my ($foo, $bar, $foo_too, $bar_too, $foo_who_poo) = @_;
}

do_stuff(one=>$foo, two=>$bar, three=>$foo_too, four=>$foo_who_poo);

sub do_stuff {
   my %args = @_;
}