{"id":3943,"date":"2016-11-08T18:33:09","date_gmt":"2016-11-08T09:33:09","guid":{"rendered":"http:\/\/www.nkozawa.com\/blog\/?p=3943"},"modified":"2016-11-08T18:33:09","modified_gmt":"2016-11-08T09:33:09","slug":"perl%e3%81%a7zip%e4%b8%adzip%e3%81%8b%e3%82%89%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%82%92%e8%aa%ad%e3%81%bf%e8%be%bc%e3%82%80","status":"publish","type":"post","link":"https:\/\/www.nkozawa.com\/blog\/archives\/3943","title":{"rendered":"Perl\u3067zip\u4e2dzip\u304b\u3089\u30d5\u30a1\u30a4\u30eb\u3092\u8aad\u307f\u8fbc\u3080"},"content":{"rendered":"<p>\u81ea\u5206\u7528\u306e\u899a\u66f8\u3067\u3059\u3002zip\u30d5\u30a1\u30a4\u30eb\u306e\u4e2d\u306b\u8907\u6570\u306ezip\u30d5\u30a1\u30a4\u30eb\u304c\u6709\u308a\u3001zip\u4e2dzip\u306e\u4e2d\u304b\u3089\u76ee\u7684\u306e\u30c6\u30ad\u30b9\u30c8\u30d5\u30a1\u30a4\u30eb\u3092\u63a2\u3057\u51fa\u3057\u3066\u8aad\u307f\u8fbc\u3080\u30b5\u30f3\u30d7\u30eb\u30fb\u30b3\u30fc\u30c9\u3067\u3059\u3002\u7279\u5225\u306a\u3053\u3068\u306f\u4f55\u3082\u306a\u3044\u3067\u3059\u3057\u3001\u6ce8\u91c8\u306f\u8981\u3089\u306a\u3044\u3067\u3057\u3087\u3046\u3002<br \/>\n<code><\/code><\/p>\n<pre>#!\/usr\/bin\/perl\r\n\r\nmy $fn_to_be_found = \"target.txt\";\r\n\r\nif ($ARGV[0] =~ \/zip$\/i) {\r\n\tuse File::Temp qw\/tempfile\/;\r\n\tuse Archive::Zip;\r\n\tmy $zip = Archive::Zip-&gt;new;\r\n\t$zip-&gt;read($ARGV[0]);\r\n\tmy @members = $zip-&gt;membersMatching(\/zip$\/i);\r\n\tmy $finish = 0;\r\n\tforeach my $m (@members) {\r\n\t\tmy $fn = $m-&gt;fileName;\r\n\t\tprint \"zip in zip file: $fn\\n\";\r\n\t\tmy ($temp_fh, $temp_filename) = tempfile(UNLINK =&gt; 1);\r\n\t\tprint \"Temporary file name: $temp_filename\\n\";\r\n\t\t$m-&gt;extractToFileHandle($temp_fh);\r\n\t\t$temp_fh-&gt;flush;\r\n\t\tmy $zip2 = Archive::Zip-&gt;new;\r\n\t\t$zip2-&gt;read($temp_filename);\r\n\t\tmy $m2 = $zip2-&gt;memberNamed($fn_to_be_found);\r\n\t\tif ($m2) {\r\n\t\t\tmy $fn2 = $m2-&gt;fileName;\r\n\t\t\tprint \"&gt;&gt;$fn2\\n\";\r\n\t\t\t$file_contents = $m2-&gt;contents;\r\n\t\t\t$finish = 1;\r\n\t\t}\r\n\t\tclose $temp_fh;\r\n\t\tif ($finish) {last;}\r\n\t}\r\n}\r\n\r\n# print $file_contents;\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u81ea\u5206\u7528\u306e\u899a\u66f8\u3067\u3059\u3002zip\u30d5\u30a1\u30a4\u30eb\u306e\u4e2d\u306b\u8907\u6570\u306ezip\u30d5\u30a1\u30a4\u30eb\u304c\u6709\u308a\u3001zip\u4e2dzip\u306e\u4e2d\u304b\u3089\u76ee\u7684\u306e\u30c6\u30ad\u30b9\u30c8\u30d5\u30a1\u30a4\u30eb\u3092\u63a2\u3057\u51fa\u3057\u3066\u8aad\u307f\u8fbc\u3080\u30b5\u30f3\u30d7\u30eb\u30fb\u30b3\u30fc\u30c9\u3067\u3059\u3002\u7279\u5225\u306a\u3053\u3068\u306f\u4f55\u3082\u306a\u3044\u3067\u3059\u3057\u3001\u6ce8\u91c8\u306f\u8981\u3089\u306a\u3044\u3067\u3057\u3087\u3046\u3002 #!\/usr\/ [&hellip;]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[27],"tags":[],"class_list":["post-3943","post","type-post","status-publish","format-standard","hentry","category-programing"],"aioseo_notices":[],"_links":{"self":[{"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/posts\/3943","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/comments?post=3943"}],"version-history":[{"count":4,"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/posts\/3943\/revisions"}],"predecessor-version":[{"id":3947,"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/posts\/3943\/revisions\/3947"}],"wp:attachment":[{"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/media?parent=3943"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/categories?post=3943"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.nkozawa.com\/blog\/wp-json\/wp\/v2\/tags?post=3943"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}