May 11(Tue), 2010 久しぶりにPerl弄ったよ
■[Perl]Microsoft Office Word 2007からドキュメント本体のXMLを抽出する方法
extract_document.pl
use Archive::Zip; Archive::Zip->new("$ARGV[0]")->extractMember('word/document.xml', "./$ARGV[0].xml");
こんな風に使います．
$ perl extract_document.pl target.docx
すると，同じディレクトリにtarget.docx.xmlが生成されます．
Permalink | コメント(0) | トラックバック(0) | 20:00 
トラックバック - http://d.hatena.ne.jp/Syo-Takasaki/20100511/1273575629
リンク元
- 24 http://webcache.googleusercontent.com/search?q=cache:NsHUFXpPYbsJ:d.hatena.ne.jp/Syo-Takasaki/20100507/1273208095+ubuntu+netbean+文字化け&cd=5&hl=ja&ct=clnk&client=ubuntu
- 13 http://www.google.co.jp/search?sourceid=navclient&hl=ja&ie=UTF-8&rlz=1T4GGLL_jaJP373JP373&q=vm+イメージ コピー
- 9 http://d.hatena.ne.jp/
- 6 http://www.google.com/cse?cx=partner-pub-9300639326172081:d9bbzbtli15&ie=UTF-8&sa=Search&q=netbeans+ubuntu+文字化け
- 5 http://www.google.com/custom?hl=en&client=pub-9300639326172081&cof=FORID:13;AH:left;CX:Ubuntu%208%2E04;L:http://www.google.com/intl/en/images/logos/custom_search_logo_sm.gif;LH:30;LP:1;LC:#0000ff;VLC:#
- 5 http://www.google.com/search?client=ubuntu&channel=fs&q=ubuntu+10.04+netbeans+インストール&ie=utf-8&oe=utf-8
- 5 http://www.google.com/search?client=ubuntu&channel=fs&q=ubuntu10+jdk+インストール&ie=utf-8&oe=utf-8
- 4 http://www.google.co.jp/search?hl=ja&q=vmware+イメージ+コピー&aq=8cr&aqi=g2g-cr8&aql=&oq=vmware+コピー&gs_rfai=
- 4 http://www.google.com/search?client=ubuntu&channel=fs&q=netbeans+ubuntu&ie=utf-8&oe=utf-8
- 3 http://blogsearch.google.co.jp/blogsearch?hl=ja&ie=UTF-8&q=ubuntu&lr=lang_ja&sa=N&start=30
