• # Avec Perl

    Posté par . En réponse au message [Terminal] Pour renommer des fichiers avec des chiffres. Évalué à 1.

    L'équivalent de la solution proposée :
    cd ton_répertoire
    \ls -A | perl -e '$n = 0; while (<>) { chomp; rename $_, ++$n.".jpg"; }'

    Sans renommer les fichiers commençant par un point ni les répertoires, et en conservant les suffixes pour les fichiers qui en ont :
    cd ton_répertoire
    perl -e '$n = 0; while (<*>) { -f $_ and rename $_, ++$n.(/^.*(\.[^.]{1,4})$/ ? 1ドル : ".jpg"); }'

    « Le fascisme c’est la gangrène, à Washington comme en Russie. » — adapté de Renaud, Hexagone