<div dir="ltr"><div>Le shell ne peut pas récupérer une variable interne de Perl. Ce n&#39;est pas une faiblesse de Perl, mais c&#39;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&#39;ensemble du processus en Perl. Pas compliqué, et ça n&#39;empêche pas de faire le tout dans un uniligne Perl appelé par Bash.</div><div><br></div><div>Laurent.<br></div></div><div id="DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2"><br> <table style="border-top:1px solid #d3d4de">
        <tr>
      <td style="width:55px;padding-top:18px"><a href="https://www.avast.com/sig-email?utm_medium=email&amp;utm_source=link&amp;utm_campaign=sig-email&amp;utm_content=webmail" target="_blank"><img src="https://ipmcdn.avast.com/images/icons/icon-envelope-tick-round-orange-animated-no-repeat-v1.gif" alt="" width="46" height="29" style="width: 46px; height: 29px;"></a></td>
                <td style="width:470px;padding-top:17px;color:#41424e;font-size:13px;font-family:Arial,Helvetica,sans-serif;line-height:18px">Garanti sans virus. <a href="https://www.avast.com/sig-email?utm_medium=email&amp;utm_source=link&amp;utm_campaign=sig-email&amp;utm_content=webmail" target="_blank" style="color:#4453ea">www.avast.com</a>                 </td>
        </tr>
</table>
<a href="#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2" width="1" height="1"></a></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Le mar. 31 mars 2020 à 16:27, Philippe Delavalade &lt;<a href="mailto:philippe.delavalade@orange.fr">philippe.delavalade@orange.fr</a>&gt; a écrit :<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Le mardi 31 mars à 14:54, Patrice Karatchentzeff a écrit :<br>
&gt; Un truc du genre :<br>
&gt; <br>
&gt; find -type f -name &quot;*.wav&quot; -exec $( ffmpeg -y -i {} -vn rename &#39;s/<br>
&gt; /_/g; s/wav$/wav/i&#39; {})<br>
&gt; <br>
&gt; À réécrire proprement et surtout à lancer dans un xarg pour le résultat final.<br>
&gt; <br>
&gt; T&#39;es un peu off-topic là quand même pour du perl, même si rename est<br>
&gt; une commande de Larry wall ;-)<br>
<br>
Oui, mais j&#39;espérais qu&#39;il y avait grâce à perl une façon de récupérer le<br>
nouveau nom avec une variable quelcoque.<br>
<br>
Merci, je vais tester.<br>
<br>
-- <br>
Philippe<br>
<br>
&gt; <br>
&gt; PK<br>
&gt; <br>
&gt; Le mar. 31 mars 2020 à 13:39, Philippe Delavalade<br>
&gt; &lt;<a href="mailto:philippe.delavalade@orange.fr" target="_blank">philippe.delavalade@orange.fr</a>&gt; a écrit :<br>
&gt; &gt;<br>
&gt; &gt; Bonjour.<br>
&gt; &gt;<br>
&gt; &gt; Moi je veux bien, mais quoi mettre derrière mon pie ? J&#39;ai toujours le<br>
&gt; &gt; problème du nom transformé.<br>
&gt; &gt;<br>
&gt; &gt; Oui, il y a d&#39;après mon gars environ 1,8TiB de données. Ça sera très long :-)<br>
&gt; &gt;<br>
&gt; &gt; Merci.<br>
&gt; &gt;<br>
&gt; &gt; --<br>
&gt; &gt; Philippe<br>
&gt; &gt;<br>
&gt; &gt; Le mardi 31 mars à 12:57, Patrice Karatchentzeff a écrit :<br>
&gt; &gt; &gt; Salut<br>
&gt; &gt; &gt;<br>
&gt; &gt; &gt; Tu t&#39;embêtes bien avec tes boucles...<br>
&gt; &gt; &gt;<br>
&gt; &gt; &gt; find -type f -iname -iname &quot;*.wav&quot; -exec rename (ce que tu veux) {} \;<br>
&gt; &gt; &gt;<br>
&gt; &gt; &gt; Si tu fais un pipe derrière le rename, ça doit marcher.<br>
&gt; &gt; &gt;<br>
&gt; &gt; &gt; Attention, si tu as des milliers de fichiers, il faut passer par xargs<br>
&gt; &gt; &gt;<br>
&gt; &gt; &gt; PK<br>
&gt; &gt; _______________________________________________<br>
&gt; &gt; Perl mailing list<br>
&gt; &gt; <a href="mailto:Perl@mongueurs.net" target="_blank">Perl@mongueurs.net</a><br>
&gt; &gt; <a href="http://listes.mongueurs.net/mailman/listinfo/perl" rel="noreferrer" target="_blank">http://listes.mongueurs.net/mailman/listinfo/perl</a><br>
&gt; &gt; Attention, les archives sont publiques<br>
&gt; <br>
&gt; <br>
&gt; <br>
&gt; -- <br>
&gt;       |\      _,,,---,,_           Patrice KARATCHENTZEFF<br>
&gt; ZZZzz /,`.-&#39;`&#39;    -.  ;-;;,_   mailto:<a href="mailto:patrice.karatchentzeff@gmail.com" target="_blank">patrice.karatchentzeff@gmail.com</a><br>
&gt;      |,4-  ) )-,_. ,\ (  `&#39;-&#39;<br>
&gt;     &#39;---&#39;&#39;(_/--&#39;  `-&#39;\_)<br>
&gt; _______________________________________________<br>
&gt; Perl mailing list<br>
&gt; <a href="mailto:Perl@mongueurs.net" target="_blank">Perl@mongueurs.net</a><br>
&gt; <a href="http://listes.mongueurs.net/mailman/listinfo/perl" rel="noreferrer" target="_blank">http://listes.mongueurs.net/mailman/listinfo/perl</a><br>
&gt; Attention, les archives sont publiques<br>
_______________________________________________<br>
Perl mailing list<br>
<a href="mailto:Perl@mongueurs.net" target="_blank">Perl@mongueurs.net</a><br>
<a href="http://listes.mongueurs.net/mailman/listinfo/perl" rel="noreferrer" target="_blank">http://listes.mongueurs.net/mailman/listinfo/perl</a><br>
Attention, les archives sont publiques<br>
</blockquote></div>