Select Code to Download

#!/user/bin/perl -w
use strict;
...
} else {
    print "Invalid input: Type a number or 'q' to quit\n";
}

#!/user/bin/perl -w
use strict;
...
        }
    }
}

if (...) {
   ...
...
} else {
   ...
}

if (...) {
   ...
...
}

...

if (X) {
   ...
...
} else {
   ...
}