Select Code to Download

while () {
print "Are you having/had a good, bad, or iffy day $name?: ";
...
        
}    
print "\n";

elsif ($input ne 'good'|| 'bad'|| 'iffy') {
             next;}