Image::Xbm2bmp - for converting image file from XBM to BMP.
use Image::Xbm2bmp; #Create a object from a xbm file my $obj = Image::Xbm2bmp->new("/tmp/test.xbm"); #Create a object from array data my $xbm_width = 32; my $xbm_height = 24; my @xbm_data = ( 0x7c,0x3c,0x7c,0x3c, 0xfe,0x7c,0xfe,0x7c, 0xee,0xee,0xee,0xee, 0xe0,0xee,0x60,0xee, 0x70,0xfe,0x30,0xfe, 0x38,0xec,0xe0,0xec, 0x1c,0xe0,0xee,0xe0, 0xfe,0x7e,0xfe,0x7e, 0xfe,0x3c,0x7c,0x3c ); my $obj = Image::Xbm2bmp->new(); $obj->load_xbm_data(\@xbm_data,$xbm_width,$xbm_height); #Save as a BMP file $obj->to_bmp_file("/tmp/test.bmp"); #Or get a packed data my $packed_data = $obj->to_bmp_pack(); open(FILE,">/tmp/test.bmp"); print FILE $packed_data; close(FILE); #In CGI script print "Content-type: image/bmp\n\n"; print $obj->to_bmp_pack();
XBM is a simple image format,we can show a dynamic picture easily via it,so some CGI use xbm file,but it can't be used in browser at WindowsXP(sp2),so we need a module to converting it.
None by default.
huang xin hx1978@hotmail.com
perl.
To install Image::Xbm2bmp, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Image::Xbm2bmp
CPAN shell
perl -MCPAN -e shell install Image::Xbm2bmp
For more information on module installation, please visit the detailed CPAN module installation guide.