Select Code to Download

print "enter some text and press enter\n";
print "enter quit to exit\n";
...
    exit if $_ = quit";
    print "I got $_\n";
}

print "sleeping: ";
sleep 2;
...
print "sleeping again: ";
sleep 2;
print "done\n"