- or download this
use Getopt::Long;
...
my $path = $opt{path};
my $file = $opt{file};
- or download this
my $fullFile = $path . $file;
unlink($fullFile) or die "$!\n";
- or download this
foreach my $arrayFile(@array) {
my $fullFile = $path . $arrayFile;
unlink($fullFile) or die "$!\n";
}