Select Code to Download

use strict;
use warnings;
...

    print "$_\n" for @output;
}

use strict;
use warnings;
...
            IPC::Cmd::run( command => 'blubb', verbose => 0 );
    print $success, "\n";
}