Select Code to Download

#!/usr/local/bin/perl -w
use Getopt::Long;
...
if ($DELETE) {
   ...
}

# the short form
script.pl -a -r -d
...
script.pl --add --remove --delete
script.pl --delete
...

#!/usr/local/bin/perl -w
use Getopt::Long;
...
        print "Command [$action] is NOT monitored\n";
    }
}

Command [ADD] is monitored
Command [ADD] is monitored
...
Command [ADD] is monitored
Command [DELETE] is monitored
Command [FREE] is NOT monitored