Path: usenet.cise.ufl.edu!newsfeeds.nerdc.ufl.edu!zombie.ncsc.mil!newsgate.duke.edu!nntp-out.monmouth.com!newspeer.monmouth.com!newsfeed.corridex.com!nntp2.savvis.net!inetarena.com!not-for-mail
From: Martin Schwartz <schwartz@cs.tu-berlin.de>
Newsgroups: comp.lang.perl.announce,comp.lang.perl.modules
Subject: ANNOUNCE: Document::Info 0.01
Followup-To: comp.lang.perl.modules
Date: 31 Mar 1999 13:26:52 GMT
Organization: Technical University of Berlin, Germany
Lines: 62
Approved: merlyn@stonehenge.com (comp.lang.perl.announce)
Message-ID: <7dt7qs$lca$1@play.inetarena.com>
NNTP-Posting-Host: halfdome.holdit.com
X-Disclaimer: The "Approved" header verifies header information for article transmission and does not imply approval of content.
Xref: usenet.cise.ufl.edu comp.lang.perl.announce:273 comp.lang.perl.modules:9910


Welcome to a new Module!

Document::Info v0.01 - Determine the file type of office documents.

(Currently mainly, cough, supported: MS Excel, MS Powerpoint and MS Word.)


DESCRIPTION

The module tries to figure out the document type of Office files. It utilizes
OLE::Storage to determine the file type of Windows documents. The module is
in a very early state.

Along with it comes the little demo application "lfile". If Document::Info
cannot yield the documents type it simply utilizes the well known file(1).

I'd enjoy your feedback about the package hierarchy "Document::Info" and 
like especially to know if you regard the module being useful at all.


EXAMPLE

    use Document::Info;

    if ( $Info=Document::Info->new($fileName) ) {;
        # $Info constructed, that means something has been determined.

        # Fetch the currently supported properties.
        $type = $Info -> getType ( );
        $rev  = $Info -> getRevision ( );
        $os   = $Info -> getOS ( );

        if ( $type eq $Info->cMSExcel() ) {
           # Do something. Note: when checking a type or an operating System
           # always use the string constants like cMSExcel().
        }
        if ( !$revision ) {
            # revision not determined.
        }
    } else {
        # Document type could not be determined.
    }


LOCATION

    Document-Info-0.01.tar.gz 
    
    is to be found at your favorite CPAN site in my directory, something:

        CPAN/modules/by-author/Martin_Schwartz/

    or at:

        http://www.cs.tu-berlin.de/~schwartz/perl/


-- 
// Le degre zero de l'ecriture? Zero probleme!



.