Salut à tous!

J'utilise le module Image::Magick pour convertir mes fichiers pdf en jpg. J'en profite pour ajouter une petite ligne de texte sur l'image finale:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
use strict;
use Carp;
use Image::Magick;
 
my @fichiers_pdf = ('ppr.pdf');
 
# Conversion des pdf en jpg et suppression des pdf
foreach my $file_pdf (@fichiers_pdf) {
	my $image = new Image::Magick;
	if ($file_pdf =~/(.+)\.pdf$/i){
	    my $name_jpg = $1.".jpg";
		#conversion pdf to jpg
		$image->Read($file_pdf);
		my ($largeur,$hauteur) = $image->Get(qw(width height));	#Recupere les dimensions de l'image
		$largeur = 5;
		$hauteur = ($hauteur - 10);
		$image->Annotate(x => $largeur, y => $hauteur,
		                 pointsize => 10, 
		                 fill      => 'black', 
		                 text      => 'Nouvelle image'
		                 );
		#$image ->Resize(width=>580, height=>400);
		$image->Write($name_jpg);
		# suppression pdf
		#unlink ($file_pdf);
	}
}
ça marche impeccable sur mon mac perso, mais dès que je passe sur le serveur (MAC OS X server), j'ai un petit souci.
mon image .jpg est bien créée, sauf que la ligne de texte que je voulais ajouter est absente.
J'ai installé les mêmes modules et packages que ce soit sur l'ordi ou sur le serveur ...
Quelqu'un aurait-il une idée?

Merci!