<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman, new york, times, serif;font-size:12pt"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">Ola Pessoal.. Obrigada pelas Dicas..<br><br>Nao estou mais usando o comando system("cat...) :D<br><br>Tentei usar o File::Cat mas nao deu certo.. <br><br>tentei assim:<br>open (OUTFILE,">>$out") || die "O arquivo nao pode ser aberto para leitura\n";<br><br>for(@arquivos)<br>{<br> open(ARQ, "<$_");<br> print "$_\n";<br> print OUTFILE <ARQ>;<br> close ARQ;<br>}<br><br>Mas para uma surpresa nao tem o msm efeito que o CAT >( alguem sabe o pq??<br><br><br><br>Obrigda<br><br><br><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">----- Mensagem original ----<br>De: Alceu R. de Freitas Jr. <glasswalk3r@yahoo.com.br><br>Para: Cascavel Perl Mongers
<cascavel-pm@pm.org><br>Enviadas: Quinta-feira, 14 de Dezembro de 2006 18:11:44<br>Assunto: Re: [Cascavel-pm] Res: Res: Res: Comando SYSTEM(CAT)<br><br><div>"system("cat @arquivos>>$out");" ?!?<br><br>"Rogai por nós pecadores, agora e na hora de nossa<br>morte... amém!"<br><br>Seria melhor você utilizar shell script... pelo menos<br>seria justificável usar o cat.<br><br>Se você está tendo problemas de permissão, seu script<br>sequer vai lhe mostrar isso porque você não testa<br>absolutamente nada do que o programa faz. Um simples<br><br>open(FILE, "<$file") or die "Cannot read $file: $!\n";<br><br>Lhe diria o que está acontecendo.<br><br>Minha dica fica por fazer uma boa leitura:<br>Perl Testing: A Developer's Notebook<br>Langworth, Ian / chromatic<br>O'Reilly<br>ISBN: 0596100922<br><br>O livro "Perl Best Pratices" deve dizer algo a esse<br>respeito também. Qualquer livro (decente) de Extreme<br>Programming também.<br><br>Pare de usar
POG's<br>(<a target="_blank" href="http://desciclo.pedia.ws/wiki/Programa%25C3%25A7%25C3%25A3o_Orientada_a_Gambiarras">http://desciclo.pedia.ws/wiki/Programa%25C3%25A7%25C3%25A3o_Orientada_a_Gambiarras</a>)<br>e salve sua sanidade (e a de outros programadores<br>também).<br><br>[]'s<br>Alceu<br><br>> ----- Mensagem original ----<br>> De: Patty Silva <ptfzs@yahoo.com.br><br>> Para: Cascavel Perl Mongers <cascavel-pm@pm.org>;<br>> Lista-PortoAlegre <portoalegre-pm@pm.org><br>> Enviadas: Quinta-feira, 14 de Dezembro de 2006<br>> 16:25:57<br>> Assunto: [Cascavel-pm] Comando SYSTEM(CAT)<br>> <br>> Ola Pessoal tudo Bem?<br>> Esta acontecendo uma coisa interessante testei meu<br>> sistema em outra maquina (LINUX) porem na hora de<br>> executar o comando:<br>> <br>> <br>> system("cat<br>> @arquivos>>$out");<br>> <br>> ELE nao funciona....(na minha maquina funciona)<br>> <br>>
tem outro jeito deu fazer isso??<br>> obrigada<br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> O Yahoo! está de cara nova. Venha<br>><br>conferir!_______________________________________________<br>> Cascavel-pm mailing list<br>> Cascavel-pm@pm.org<br>> <a target="_blank" href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> Novidade no Yahoo! Mail: receba alertas de novas<br>> mensagens no seu celular. Registre seu aparelho<br>><br>agora!_______________________________________________<br>> Cascavel-pm mailing list<br>> Cascavel-pm@pm.org<br>> <a target="_blank" href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>> <br>>
<br>> <br>> <br>> <br>> <br>> <br>> Você quer respostas para suas perguntas? Ou você<br>> sabe muito e quer compartilhar seu conhecimento?<br>> Experimente o Yahoo!<br>><br>Respostas!_______________________________________________<br>> Cascavel-pm mailing list<br>> Cascavel-pm@pm.org<br>> <a target="_blank" href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>> <br>><br>_______________________________________________________<br>> <br>> Você quer respostas para suas perguntas? Ou você<br>> sabe muito e quer compartilhar seu conhecimento?<br>> Experimente o Yahoo! Respostas !<br>> <a target="_blank"
href="http://br.answers.yahoo.com/">http://br.answers.yahoo.com/</a>><br>_______________________________________________<br>> Cascavel-pm mailing list<br>> Cascavel-pm@pm.org<br>> <a target="_blank" href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br><br><br><br> <br>_______________________________________________________ <br>Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! <br><a target="_blank" href="http://br.mobile.yahoo.com/mailalertas/">http://br.mobile.yahoo.com/mailalertas/</a> <br> <br><br>_______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.org<br><a target="_blank" href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></div></div><br></div></div><br>
<hr size=1>
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. <a href="http://us.rd.yahoo.com/mail/br/tagline/mobile_alerts/*http://br.mobile.yahoo.com/mailalertas/">Registre seu aparelho agora!</a></body></html>