Select Code to Download

sub remove {
    my %del = map { $_ => 1 } @_;
    @items = grep { not $del{$_} } @items;
}