1Image::Info::BMP(3) User Contributed Perl Documentation Image::Info::BMP(3)
2
3
4
6 Image::Info::BMP - Windows Device Indepdent Bitmap support for
7 Image::Info
8
10 use Image::Info qw(image_info dim);
11
12 my $info = image_info("image.bmp");
13 if (my $error = $info->{error}) {
14 die "Can't parse image info: $error\n";
15 }
16 my $color = $info->{color_type};
17
18 my($w, $h) = dim($info);
19
21 This modules supplies the standard key names except for Gamma,
22 Interlace, LastModificationTime, as well as:
23
24 BMP_ColorsImportant
25 Specifies the number of color indexes that are required for
26 displaying the bitmap. If this value is zero, all colors are
27 required.
28
29 BMP_Origin
30 If true the bitmap is a bottom-up DIB and its origin is the lower-
31 left corner. Otherwise, the bitmap is a top-down DIB and its
32 origin is the upper-left corner.
33
34 ColorPalette
35 Reference to an array of all colors used. This key is only present
36 if "image_info" is invoked as "image_info($file, ColorPalette=>1)".
37
38 ColorTableSize
39 The number of colors the image uses. If 0 then this is a true
40 color image. The number of color available is 2 ^ BitsPerSample.
41
43 process_file()
44 $info->process_file($source, $options);
45
46 Processes one file and sets the found info fields in the $info object.
47
49 Image::Info
50
52 For more information about BMP see <http://msdn.microsoft.com>.
53
54 Random notes:
55
56 warn if height is negative and compress is not RGB or BITFILEDS (0 or 3)
57 ICO and CUR support?
58 ### v5
59 If bit depth is 0, it relies upon underlying JPG/PNG :-(
60 Extra Information
61 DWORD bV5RedMask;
62 DWORD bV5GreenMask;
63 DWORD bV5BlueMask;
64 DWORD bV5AlphaMask;
65 DWORD bV5CSType;
66 CIEXYZTRIPLE bV5EndPoints; #3*CIEXYZ #CIEXYZ = 3*FXPT2DOT30#FXPT2DOT30 = long
67 DWORD bV5GammaRed;
68 DWORD bV5GammaGreen;
69 DWORD bV5GammaBlue;
70 DWORD bV5Intent;
71 DWORD bV5ProfileData;
72 DWORD bV5ProfileSize;
73
75 Size mismatch
76 The image may be correct, the filesize does not match the
77 internally stored value.
78
80 The current implementation only function on little-endian
81 architectures. Consequently erroneous data concerning compression
82 (including file_ext and file_mime_type) may be reported.
83
85 Jerrad Pierce <belg4mit@mit.edu>/<webmaster@pthbb.org>
86
87 This library is free software; you can redistribute it and/or modify it
88 under the same terms as Perl itself.
89
90
91
92perl v5.16.3 2012-10-25 Image::Info::BMP(3)