Il me semble que ImageMagick sait faire ca tout seul comme un grand, mais comme je connais pas bien ses options on peut scripter, ca donnerait un truc du genre:
if [ height -geq 450 ];then
convert -scale x450 $file $out_file
fi
Ce qui doit pouvoir se traduire tres facilement en perl (quand on connait un minimum le perl ce qui est pas mon cas).
Les commandes identify & convert font partie de ImageMagick donc ne devraient pas poser de probleme.
# Avec ImageMagick et un peu de bash (et consors)
Posté par Ph Husson (site web personnel) . En réponse au message Automatisation de réduction d'image. Évalué à 4.
height=$(identify $file | awk '{print 3ドル}'|awk -F 'x' '{print 2ドル}')
if [ height -geq 450 ];then
convert -scale x450 $file $out_file
fi
Ce qui doit pouvoir se traduire tres facilement en perl (quand on connait un minimum le perl ce qui est pas mon cas).
Les commandes identify & convert font partie de ImageMagick donc ne devraient pas poser de probleme.