Namazu-devel-ja(旧)
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
File-MMagic (Re: ichitaro)
knok@xxxxxxxxxxxxx (NOKUBI Takatsugu) wrote:
>> のパッチをあてれば解決します。問題がなければ修正してください
>> ませ。 > 野首さん
>
> 修正して commit しました。excel/word8 の問題にも対処しました。以下の
>ような entry で動作するようになっています。
最新の File::MMagic を試しました。が、動作がおかしいようです。
word/excel ともに text/plain として認識されています。
% cat =File
#! /usr/local/bin/perl -w
use strict;
use File::MMagic;
my $magic = new File::MMagic;
for my $file (@ARGV) {
my $mtype = $magic->checktype_filename($file);
printf "$file: $mtype\n";
}
% File *(.)
Makefile: text/plain
Makefile.am: text/plain
Makefile.in: text/plain
acrobat3.pdf: application/pdf
acrobat4.pdf: application/pdf
d20000220.hnf: text/plain
excel97.xls: text/plain
foo.html: text/html
html.html: text/html
mail-multipart.txt: message/rfc822
mail.txt: message/rfc822
man.1: text/x-roff
msg00000.html: text/html
pdf.pdf: application/pdf
plain.txt: text/plain
plain.txt.Z: application/x-compress
plain.txt.bz2: application/x-bzip2
plain.txt.gz: application/x-gzip
rfc0000.txt: text/plain
tex.tex: text/plain
word6.doc: text/plain
word95.doc: text/plain
word97.doc: text/plain
word98.doc: text/plain
-- Satoru Takabayashi