[Perl] récupérer le nouveau nom après rename

[Laurent Rosenfeld]

Le shell ne peut pas récupérer une variable interne de Perl. Ce n'est pas
une faiblesse de Perl, mais c'est inhérent à la façon dont Unix ou Linux
lancent leurs sous-process. Il y a biien sûr des solutions de contournement
(comme écrire un fichier), mais on ne peut pas dire que ce soit très
propre. Je rejoins Sylvain: autant faire l'ensemble du processus en Perl.
Pas compliqué, et ça n'empêche pas de faire le tout dans un uniligne Perl
appelé par Bash.

Laurent.

<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
Garanti
sans virus. www.avast.com
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
<#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>

Le mar. 31 mars 2020 à 16:27, Philippe Delavalade <
philippe.delavalade at orange.fr> a écrit :

> Le mardi 31 mars à 14:54, Patrice Karatchentzeff a écrit :
> > Un truc du genre :
> >
> > find -type f -name "*.wav" -exec $( ffmpeg -y -i {} -vn rename 's/
> > /_/g; s/wav$/wav/i' {})
> >
> > À réécrire proprement et surtout à lancer dans un xarg pour le résultat
> final.
> >
> > T'es un peu off-topic là quand même pour du perl, même si rename est
> > une commande de Larry wall ;-)
>
> Oui, mais j'espérais qu'il y avait grâce à perl une façon de récupérer le
> nouveau nom avec une variable quelcoque.
>
> Merci, je vais tester.
>
> --
> Philippe
>
> >
> > PK
> >
> > Le mar. 31 mars 2020 à 13:39, Philippe Delavalade
> > <philippe.delavalade at orange.fr> a écrit :
> > >
> > > Bonjour.
> > >
> > > Moi je veux bien, mais quoi mettre derrière mon pie ? J'ai toujours le
> > > problème du nom transformé.
> > >
> > > Oui, il y a d'après mon gars environ 1,8TiB de données. Ça sera très
> long :-)
> > >
> > > Merci.
> > >
> > > --
> > > Philippe
> > >
> > > Le mardi 31 mars à 12:57, Patrice Karatchentzeff a écrit :
> > > > Salut
> > > >
> > > > Tu t'embêtes bien avec tes boucles...
> > > >
> > > > find -type f -iname -iname "*.wav" -exec rename (ce que tu veux) {}
> \;
> > > >
> > > > Si tu fais un pipe derrière le rename, ça doit marcher.
> > > >
> > > > Attention, si tu as des milliers de fichiers, il faut passer par
> xargs
> > > >
> > > > PK
> > > _______________________________________________
> > > Perl mailing list
> > > Perl at mongueurs.net
> > > http://listes.mongueurs.net/mailman/listinfo/perl
> > > Attention, les archives sont publiques
> >
> >
> >
> > --
> >       |\      _,,,---,,_           Patrice KARATCHENTZEFF
> > ZZZzz /,`.-'`'    -.  ;-;;,_   mailto:patrice.karatchentzeff at gmail.com
> >      |,4-  ) )-,_. ,\ (  `'-'
> >     '---''(_/--'  `-'\_)
> > _______________________________________________
> > Perl mailing list
> > Perl at mongueurs.net
> > http://listes.mongueurs.net/mailman/listinfo/perl
> > Attention, les archives sont publiques
> _______________________________________________
> Perl mailing list
> Perl at mongueurs.net
> http://listes.mongueurs.net/mailman/listinfo/perl
> Attention, les archives sont publiques
>
-------------- section suivante --------------
Une pièce jointe HTML a été nettoyée...
URL: <http://listes.mongueurs.net/archives/perl/attachments/20200401/97195c0d/attachment-0001.html>