Select Code to Download

package Somename;
...
    my $five = shift;
    
    # long complicated code

use Somename;
Somename::foo(1,2,3,4,5);