#!/usr/bin/perl
opendir(DIR,".");
while($fich = readdir(DIR))
{
if ($fich=~m/.*jpg$/ or $fich=~m/.*JPG/)
{
#        $commande="convert -scale x315 \"$fich\" \"result\/\"\"$fich\"";
        $commande="convert -rotate 90 $fich r90$fich";
        print "$commande\n";
system("$commande");
}
}
close DIR;



Intéressant en efet . Juste une question : où faut-il entrer ce script pour pouvoir y accéder ultérieurement ?

Stéphane

Vous souhaitez acquerir votre Pack ou des Services MandrakeSoft?
Rendez-vous sur "http://www.mandrakestore.com";.

Foire Aux Questions de la liste : http://mdk.mondelinux.org

Répondre à