Received: from ns.ATComputing.nl (ns.ATComputing.nl [195.108.229.25])
by atcmpg.ATComputing.nl (8.9.0/8.9.0) with ESMTP id BAA16135
for <markov@ATComputing.nl>; Fri, 31 Mar 2000 01:39:18 +0200 (MET DST)
Received: (from nobody@localhost)
by ns.ATComputing.nl (8.8.8/8.8.8) id BAA31743
for <markov@ATComputing.nl>; Fri, 31 Mar 2000 01:39:18 +0200
Received: from viper.oldcity.dca.net(216.158.38.4) by ns.ATComputing.nl via smap (V2.1)
id xma031741; Fri, 31 Mar 00 01:39:12 +0200
Received: from unca-don.wizards.dupont.com ([204.183.81.133])
by viper.oldcity.dca.net (8.9.3/8.9.3/DCANET) with ESMTP id SAA08310;
Thu, 30 Mar 2000 18:37:29 -0500
Received: (from majordomo@localhost)
by unca-don.wizards.dupont.com (8.9.3/8.9.3) id SAA05154
for magick-outgoing; Thu, 30 Mar 2000 18:24:04 -0500 (EST)
X-Authentication-Warning: unca-don.wizards.dupont.com: majordomo set sender to owner-magick@wizards.dupont.com using -f
From: "Carl Knoos" <cknoos@atg.com>
To: <magick@wizards.dupont.com>
Subject: Problem resizing images through perl script
Date: Thu, 30 Mar 2000 18:27:54 -0500
Message-ID: <NDBBJJFDMKFOAIFBEPPJIELLCBAA.cknoos@atg.com>
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2910.0)
In-Reply-To: <10F4E7B8292FD311B34400A0C978B70532A61B@a254.117.208.207.ded23.interaccess.com>
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6600
Sender: owner-magick@wizards.dupont.com
Precedence: bulk
Reply-To: "Carl Knoos" <cknoos@atg.com>
Content-Type: text/plain;
charset="iso-8859-1"
Status: RO
X-Status: A
Content-Length: 1270
Lines: 47
I know this probably doesn't belong here, but
I don't who else to ask :)
Basically, I have imagemagick installed and it works
like a charm!
if I run mogrify -geometry 95x95 whatever.jpg
I get exactly what I want, except when I try
to do it from Perl...
If I in a perl script say:
sub GenerateThumb {
$fsize = -s "$GalleryPath/$ShortFilename";
if ($thumbmethod == 1) {
# copy image.
open(IMGFILE, "$GalleryPath/$ShortFilename");
open(TNFILE, ">$GalleryPath/tn_$ShortFilename");
binmode(IMGFILE);
binmode(TNFILE);
read(IMGFILE, $buffer, $fsize);
print TNFILE $buffer;
close(TNFILE);
close(IMGFILE);
chmod (0777, "$GalleryPath/tn_$ShortFilename");
# resize it.
$result="$mogrifypath/mogrify -geometry 96x96
$GalleryPath/tn_$ShortFilename";
}
}
It all works great until it comes to the resizing, it just seem to skip the
last step.
the variable $mogrifypath is set correctly to /usr/bin
Does anyone what I'm doing wrong?
/Carl
***********************************************************************
To remove yourself from this mailing list, send mail to:
majordomo@wizards.dupont.com
Include the following command in the body of your message:
unsubscribe magick
***********************************************************************