# Because of my C++ background use constant PROJECT => (@ARGV) ? $ARGV[0] : ''; use constant ARCHIVE => (@ARGV > 1) ? $ARGV[1] : '';