Select Code to Download

#! /usr/bin/perl -w
# retcode.pl
...
my $retcode = $ARGV[0] || 0;
print "Return code = $retcode\n";
exit $retcode;

@echo off
rem A Command file that uses conditional processing.
...

:end_label
echo Done!