If you know anything about PerlMagick/ImageMagick, please have a look - GoFuckYourself.com

SpaceAce · 09-12-2002, 12:12 PM

I've written a PERL script to thumbnail pictures for me (auto cropping so I can make all the thumbs the same size without distortion) usin PerlMagick. It works great except for one bizarre problem: when I run the program on this one specific set of pictures I have, the thumbs are huge (filesize). I'm talking 35-45K for thumbnails that are 95x115. So far, I have run the program on three sets of content and only one does this. It doesn't matter if I adjust the quality, either. Quality = 75 or quality = 0, the thumbs are huge.

The script does this:
Calculate size for cropping
PerlMagick->Crop()
PerlMagick->Resize()
PerlMagick->Write()

I couldn't find any really good mailing lists for this question and since it's porn-related, I thought I'd ask here. I appreciate any help.

SpaceAce

boldy · 09-12-2002, 12:14 PM

take a look at nconvert

I've struggled with perlmagic also ..

SpaceAce · 09-12-2002, 12:45 PM

Thanks, boldy, I'll look into that right away.

Anyone else have some suggestions in case this doesn't work?

SpaceAce

Alky · 09-12-2002, 12:49 PM

ya use convert .... just doing a project now actually where i need it, but if anyone can tell me how to stop the premature header errors from convert i'd owe ya.

btw, i dont use the perl modules for them, i just use system calls..

`convert origfile -geometry 75x75+0+0 thumbfile`;

mike

SpaceAce · 09-12-2002, 12:52 PM

I didn't see the functions I wanted available from command-line convert which is why I went with PerlMagick. Also, I am thinking of adding thumbnailing capability to AVS Weasel, which also means PERL.

SpaceAce

SpaceAce · 09-12-2002, 12:53 PM

Actually, there does seem to be more functions in this newer version I installed. Let's see if it makes smaller thumbnails.

[Later...]
The answer is "no". Still produces great big honkin' thumbnalils

SpaceAce

SpaceAce · 09-12-2002, 01:04 PM

Mystery solved: it's embedded profile information. Just fire this up before saving the image:

$image->Profile(name=>"*");

SpaceAce

grumpy · 09-12-2002, 02:02 PM

use php...its easy then

09-12-2002, 12:12 PM	#1
SpaceAce Confirmed User Join Date: Jul 2002 Location: Magrathea Posts: 6,493	If you know anything about PerlMagick/ImageMagick, please have a look I've written a PERL script to thumbnail pictures for me (auto cropping so I can make all the thumbs the same size without distortion) usin PerlMagick. It works great except for one bizarre problem: when I run the program on this one specific set of pictures I have, the thumbs are huge (filesize). I'm talking 35-45K for thumbnails that are 95x115. So far, I have run the program on three sets of content and only one does this. It doesn't matter if I adjust the quality, either. Quality = 75 or quality = 0, the thumbs are huge. The script does this: Calculate size for cropping PerlMagick->Crop() PerlMagick->Resize() PerlMagick->Write() I couldn't find any really good mailing lists for this question and since it's porn-related, I thought I'd ask here. I appreciate any help. SpaceAce

09-12-2002, 12:14 PM	#2
boldy Macdaddy coder Industry Role: Join Date: Feb 2002 Location: MacDaddy pimp coder Posts: 2,806	take a look at nconvert I've struggled with perlmagic also .. __________________ MacDaddy Coder.

09-12-2002, 12:53 PM	#6
SpaceAce Confirmed User Join Date: Jul 2002 Location: Magrathea Posts: 6,493	Actually, there does seem to be more functions in this newer version I installed. Let's see if it makes smaller thumbnails. [Later...] The answer is "no". Still produces great big honkin' thumbnalils SpaceAce Last edited by SpaceAce; 09-12-2002 at 12:57 PM..

09-12-2002, 01:04 PM	#7
SpaceAce Confirmed User Join Date: Jul 2002 Location: Magrathea Posts: 6,493	Mystery solved: it's embedded profile information. Just fire this up before saving the image: $image->Profile(name=>""); SpaceAce Last edited by SpaceAce; 09-12-2002 at 01:12 PM..*

09-12-2002, 02:02 PM	#8
grumpy Too lazy to set a custom title Join Date: Jan 2002 Location: Holland Posts: 9,870	use php...its easy then __________________ Don't let greediness blur your vision \| You gotta let some shit slide icq - 441-456-888

09-12-2002, 12:45 PM	#3
SpaceAce Confirmed User Join Date: Jul 2002 Location: Magrathea Posts: 6,493	Thanks, boldy, I'll look into that right away. Anyone else have some suggestions in case this doesn't work? SpaceAce

09-12-2002, 12:49 PM	#4
Alky Confirmed User Join Date: Apr 2002 Location: Houston Posts: 5,651	ya use convert .... just doing a project now actually where i need it, but if anyone can tell me how to stop the premature header errors from convert i'd owe ya. btw, i dont use the perl modules for them, i just use system calls.. `convert origfile -geometry 75x75+0+0 thumbfile`; mike

09-12-2002, 12:52 PM	#5
SpaceAce Confirmed User Join Date: Jul 2002 Location: Magrathea Posts: 6,493	I didn't see the functions I wanted available from command-line convert which is why I went with PerlMagick. Also, I am thinking of adding thumbnailing capability to AVS Weasel, which also means PERL. SpaceAce