MINI

files >> C:/xampp/perl/vendor/lib/Win32/Exe/PE/Header.pm
 # Copyright 2004 by Audrey Tang <cpan@audreyt.org>

package Win32::Exe::PE::Header;

use strict;
use base 'Win32::Exe::PE';
use constant SUBFORMAT => (
    Magic2	    => 'v',
    LMajor	    => 'C',
    LMinor	    => 'C',
    CodeSize	    => 'V',
    IDataSize	    => 'V',
    UDataSize	    => 'V',
    EntryPointRVA   => 'V',
    BaseOfCode	    => 'V',
    Data	    => 'a*',
);
use constant MEMBER_CLASS => 'Data';
use constant DISPATCH_FIELD => 'Magic2';
use constant DISPATCH_TABLE => (
    0x20b   => 'PE::Header::PE32Plus',
    '*'     => 'PE::Header::PE32',
);

1;