Select Code to Download

while (@delete_me) {
        $x = pop(@delete_me);
        unlink $x or die "Can't unlink $x : $!";
}