Select Code to Download

foreach (@list) {
    my $coderef = main->can($_);
    &$coderef($_);
}

foreach (@list) {
    my $coderef = UNIVERSAL::can('main', $_);
    &$coderef($_);
}

foreach (@list) {
    main->$_($_);
}