Select Code to Download

if ($remove) {
    $remove = lc($remove);
...
            die "You chose NOT to remove queue \"$remove\"\n";
        }
    }

sub cleanthefile {
    my $sourcefile = "/u/ccsys/CC_print.printers";
...
        }
    }
}