foreach my $href ( @files_to_get ) { my $file = $href->{"files"}; print( " adding $file\n" ); my $name = $file; $name =~ s/^[A-Z]://; # remove drive $name =~ s#^[/\\]+##; # remove leading path delimiter $zip->addFile( $file, $name ); }