@jpgs=&lt;*.jpg&gt;;<br><br><div><span class="gmail_quote">Em 08/05/07, <b class="gmail_sendername">Luis Motta Campos</b> &lt;<a href="mailto:luismottacampos@yahoo.co.uk">luismottacampos@yahoo.co.uk</a>&gt; escreveu:</span>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">On May 8, 2007, at 2:00 PM, André Garcia Carneiro wrote:<br>&gt; &lt;code&gt;<br>&gt; use strict;
<br>&gt; use warnings;<br>&gt;<br>&gt; my @arq = readpipe &#39;ls &lt;meu_diretorio_de_imagens&gt;&#39; if(-d<br>&gt; &#39;meu_diretorio_de_imagens&#39;) ;<br>&gt; #Se você for usar variáveis no lugar de &lt;meu_diretorio_de_imagens&gt;
<br>&gt; você deve usar aspas duplas.<br><br>&nbsp;&nbsp; Ui! Coisa feia!<br>&nbsp;&nbsp; Mas não deve usar aspas duplas no if(-d...): a variável basta, viu?<br><br>&gt; Esse é o modo fácil, mas não o mais indicado. Existem módulos para<br>&gt; fazer isso, você pode checar no CPAN. Eu
<br>&gt; achei um interessante, o Dir::List . Faz o que você precisa e muito<br>&gt; mais.<br>&gt;<br>&gt; <a href="http://search.cpan.org/search?query=DIR&amp;mode=all">http://search.cpan.org/search?query=DIR&amp;mode=all
</a><br><br>&nbsp;&nbsp; Ajudou, tenho certeza... e mais um para a minha coleção, que eu<br>nem sabia que existia... thanks, André!<br>&nbsp;&nbsp; Putamplexos!<br>--<br>Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer,<br>Perl fanatic evangelist, and amateur {cook, photographer}
<br><br><br>_______________________________________________<br>SaoPaulo-pm mailing list<br><a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm
</a><br></blockquote></div><br><br clear="all"><br>-- <br>[]&#39;s Fernando