Difference between revisions of "Extract Metadata Word Document"
Jump to navigation
Jump to search
Onnowpurbo (talk | contribs) (New page: Instalasi Tools sudo su perl -MCPAN -e "install Bundle::CPAN" perl -MCPAN -e shell Dari shell CPAN install OLE::Storage install OLE::PropertySet install Startup install Carp ins...) |
Onnowpurbo (talk | contribs) |
||
(One intermediate revision by the same user not shown) | |||
Line 12: | Line 12: | ||
install Carp | install Carp | ||
install Unicode::Map | install Unicode::Map | ||
+ | |||
+ | Download & extract file testwd.pl | ||
+ | |||
+ | wget http://www.cpan.org/modules/by-authors/id/H/HC/HCARVEY/File-MSWord-0.1.zip | ||
+ | unzip File-MSWord-0.1.zip | ||
+ | mv MSWord.pm /usr/lib/perl5/File/ | ||
+ | |||
+ | |||
+ | Lakukan | ||
+ | |||
+ | perl testwd.pl /doc/to/analyze.doc | ||
+ | |||
+ | Akan keluar kira-kira: | ||
+ | |||
+ | |||
+ | Use of assignment to $[ is deprecated at /usr/local/share/perl/5.18.2/OLE/Storage.pm line 61. | ||
+ | Use of assignment to $[ is deprecated at /usr/local/share/perl/5.18.2/OLE/PropertySet.pm line 409. | ||
+ | Stream : 1Table | ||
+ | Stream : WordDocument | ||
+ | Stream : Data | ||
+ | Stream : �CompObj | ||
+ | Stream : DocumentSummaryInformation | ||
+ | Stream : SummaryInformation | ||
+ | |||
+ | Trash Bin Size | ||
+ | BigBlocks 0 | ||
+ | SmallBlocks 0 | ||
+ | FileEndSpace 1249 | ||
+ | SystemSpace 1232 | ||
+ | |||
+ | GUID : e011cfd0 - e11ab1a1 | ||
+ | |||
+ | lastsaved => 16.09.2015, 10:08:00 | ||
+ | authress => ASUS | ||
+ | appname => Microsoft Office Word | ||
+ | subject => | ||
+ | title => | ||
+ | lastprinted => | ||
+ | revnum => 1 | ||
+ | lastauth => ASUS | ||
+ | created => 16.09.2015, 10:04:00 | ||
+ | |||
+ | 0x0 -> 0x0 | ||
+ | Data | ||
+ | 1Table | ||
+ | |||
+ | Binary data: | ||
+ | envr => 0x0 | ||
+ | fDot => 0x12f0 | ||
+ | wIdent => 0xa5ec | ||
+ | nProduct => 0x805b | ||
+ | table => 0x1 | ||
+ | fMac => 0x10 | ||
+ | pnNext => 0x0 | ||
+ | nFib => 0xc1 | ||
+ | nFibBack => 0xbf | ||
+ | lKey => 0x0 | ||
+ | langid => 0x421 | ||
+ | |||
+ | Lang ID = Bahasa |
Latest revision as of 08:40, 21 September 2015
Instalasi Tools
sudo su perl -MCPAN -e "install Bundle::CPAN" perl -MCPAN -e shell
Dari shell CPAN
install OLE::Storage install OLE::PropertySet install Startup install Carp install Unicode::Map
Download & extract file testwd.pl
wget http://www.cpan.org/modules/by-authors/id/H/HC/HCARVEY/File-MSWord-0.1.zip unzip File-MSWord-0.1.zip mv MSWord.pm /usr/lib/perl5/File/
Lakukan
perl testwd.pl /doc/to/analyze.doc
Akan keluar kira-kira:
Use of assignment to $[ is deprecated at /usr/local/share/perl/5.18.2/OLE/Storage.pm line 61. Use of assignment to $[ is deprecated at /usr/local/share/perl/5.18.2/OLE/PropertySet.pm line 409. Stream : 1Table Stream : WordDocument Stream : Data Stream : �CompObj Stream : DocumentSummaryInformation Stream : SummaryInformation Trash Bin Size BigBlocks 0 SmallBlocks 0 FileEndSpace 1249 SystemSpace 1232 GUID : e011cfd0 - e11ab1a1 lastsaved => 16.09.2015, 10:08:00 authress => ASUS appname => Microsoft Office Word subject => title => lastprinted => revnum => 1 lastauth => ASUS created => 16.09.2015, 10:04:00 0x0 -> 0x0 Data 1Table Binary data: envr => 0x0 fDot => 0x12f0 wIdent => 0xa5ec nProduct => 0x805b table => 0x1 fMac => 0x10 pnNext => 0x0 nFib => 0xc1 nFibBack => 0xbf lKey => 0x0 langid => 0x421 Lang ID = Bahasa