tms02 has asked for the wisdom of the Perl Monks concerning the following question:
I have written a perl script that reads the UI resource files, and extracts the encoded base64 bitmap. I then decode the string.
I want to create a new image base on this current image, but double the size (from 16x16 to 32x32).If I write the decoded string out to a file in binary mode, I can view the image, but the header is missing.
How do I create the image header, so that I have a correct bitmap?
Here is what I am currently doing:Any help would be appreciated.$decodedImage = MIME::Base64::decode($image); $smallImage="c:\\temp\\image.bmp"; open(bmp,">$smallImage"); binmode(bmp); print bmp "$decodedImage"; close(bmp);
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Reading a Windows .Net Resx file
by almut (Canon) on Sep 25, 2009 at 01:12 UTC |