Select Code to Download

#!/usr/bin/perl

...
}
EOC
main;

#!/usr/bin/perl

...
    printf "success, system command executed.\n";
    return 0;
}

#!/usr/bin/perl

...
    printf "success, system command executed.\n";
    return 0;
}