Help for this page

Select Code to Download

Select or download this

foreach my $filename (@arr) {
    $x = File::Spec->catfile($path, $filename);
    unlink $x;
}

Select or download this
unlink map {File::Spec->catfile($path, $_)} @arr;