Select Code to Download

# test.pl
#!/usr/bin/perl
...
my $perl = "a.pl";

$perl->(10,20);

# add.pl
#!/usr/bin/perl
...
    my ($a , $b) = @_;
    return 0;
};