#!/usr/local/bin/perl

print "Content-type: text/plain\r\n\r\n";
system("tar zcf badfilename.tar.gz 文字化けファイルの親ディレクトリ");