7-zip tem esse comportamento e pode compactar / descompactar o formato zip:
Comovocêpodever,aextensãodoarquivofoiremovidaeorestantedonomedoarquivousadocomoonomedoarquivo.
Editar:Paraumasoluçãodelinhadecomando,vocêaindapodeusaro7-zip.Confirameuscript
#!C:/Perl/bin/perl.exe
use warnings;
use strict;
exit unless @ARGV;
my $path = "C:\Program Files\7-Zip\7z.exe"; # modify this accordingly
my $infile = (split /\./,$ARGV[0])[0];
system("\"$path\" a $infile.zip @ARGV");
Testei-o na minha pasta fasm: