unless (@ARGV == 1) {
    die "You must specify one argument\n";
}

##</code><code>##

my $argument = $ARGV[0] || 'default' ; # Put your default  
                                       # value here
if ($argument eq 'TEST') {....

##</code><code>##

if (defined $ARGV[0] && $ARGV[0] eq 'TEST') {...