Select Code to Download

while (<STDIN>) {
    chomp;
    if ($_ =~ /hello/) {
...
{
    print "bye\n";
}

while (<STDIN>) {
    unless (/hello/) {
        style2();
...
sub style2 {
    print "bye\n";
}