<div dir="ltr">Bom dia,<div><br></div><div>Se as únicas opções são os arquivos, você pode utilizar direto o @ARGV.</div><div><br></div><div>Se precisar passar mais opções, você pode fazer assim:</div><div><br></div><div><a href="https://metacpan.org/pod/Getopt::Long#Options-with-multiple-values">https://metacpan.org/pod/Getopt::Long#Options-with-multiple-values</a><br></div><div><br></div><div>###</div><div><div>#!/usr/bin/env perl</div><div><br></div><div>use strict;</div><div>use warnings;</div><div>use 5.020;</div><div><br></div><div>use Getopt::Long;</div><div><br></div><div>my @files;</div><div>GetOptions("file=s{1,}" => \@files);</div><div>say foreach @files;</div></div><div>###</div><div><br></div><div>Dentro das chaves vc pode colocar a quantidade, mínima e máxima {min,max}, mas pode também deixar em aberto.</div><div><br></div><div>[]'s</div><div class="gmail_extra"><br><div class="gmail_quote">2016-09-08 22:04 GMT-03:00 Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">


<div><div dir="ltr">Monges,<div>Boa noite.</div><div><br></div><div>Estou tentando fazer um script que abre varios arquivos recebido pela linha de comando.<br>A ideia é que ele rode com comando semelhante a esse:</div><div>./programa -f file1 file2 file3 ... filen<br>Ou seja, independe da quantidade de arquivos.<br><br>eu to tentando algo do tipo:</div><div><br></div><div>use Getopt::Long;</div><div>my @files;</div><div>GetOptions(</div><div>    "f=s{2}" => \@files,</div><div>) or die "erro";</div><div>print $_,"\n" foreach @files;</div><div><br></div><div>Porem assim eu tenho que passar exatamente 2 parametros. 1 ou 3 da erro, logicamente.<br>Eu queria saber como eu faço pra ele ser flexivel para receber 1 ou n parametros que o usuário passar.</div><div><br></div><div>Como devo fazer?</div><div><br></div><div>Abraços,</div><div>Aureliano</div><div><br> <table style="border-top-width:1px;border-top-style:solid;border-top-color:rgb(211,212,222)">
        <tbody><tr>
      <td style="width:55px;padding-top:18px"><a href="https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail" target="_blank"><img src="https://ipmcdn.avast.com/images/icons/icon-envelope-tick-round-orange-animated-tick-v1.gif" width="46" height="29" style="width: 46px; min-height: 29px;"></a></td>
                <td style="width:470px;padding-top:17px;color:rgb(65,66,78);font-size:13px;font-family:arial,helvetica,sans-serif;line-height:18px">Livre de vírus. <a href="https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail" style="color:rgb(68,83,234)" target="_blank">www.avast.com</a>.                </td>
        </tr>
</tbody></table>
<a href="#m_4996570681729084014_m_131141631852599209_DDB4FAA8-2DD7-40BB-A1B8-4E2AA1F9FDF2" width="1" height="1"></a></div>                                        </div></div>
<br>______________________________<wbr>_________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" rel="noreferrer" target="_blank">http://mail.pm.org/mailman/lis<wbr>tinfo/rio-pm</a><br></blockquote></div><br></div></div>