use Path::Class; my $tmp='./tmp/'; my @zips = map { file($tmp, $_) } qw(file1.zip file2.zip);