<div dir="ltr"><br>Eu não sabia tirar o argumento do que eu queria e passar para a sub rotina.<br><br><br>sub align<br>{<br><b>my $align = shift;</b><br>return "<p align=center>$align</p>"<br>}<br>è só eu chamar a sub rotina e por o que valor que eu quero assim:<br>
<br>sub align("TItulo");<br><br>O shift faz isso.<br><br>Obrigado.<br><br><div class="gmail_quote">2008/9/15 André Garcia Carneiro <span dir="ltr"><<a href="mailto:andre.garcia.carneir@terra.com.br">andre.garcia.carneir@terra.com.br</a>></span><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">---------- Cabeçalho original -----------<br>
<br>
De: saopaulo-pm-bounces+andre.garcia.carneir=<a href="http://terra.com.br" target="_blank">terra.com.br</a>@<a href="http://pm.org" target="_blank">pm.org</a><br>
Para: <a href="mailto:saopaulo-pm@mail.pm.org">saopaulo-pm@mail.pm.org</a><br>
Cópia:<br>
Data: Fri, 12 Sep 2008 22:27:10 -0300<br>
Assunto: [SP-pm] Criar Sub Rotinas<br>
<div class="Ih2E3d"><br>
> Olá pessoal estou aprendendo CGI, para futuramente aprender Catalyst, não<br>
> entendi a lógica de criar Sub Rotinas:<br>
<br>
</div>E eu não entendi a lógica de se aprender CGI antes de aprender Catalyst...mas tudo bem!<br>
<div class="Ih2E3d"><br>
<br>
> #!/usr/bin/perl<br>
><br>
> use strict;<br>
> use warnings;<br>
> use CGI qw( :standard );<br>
><br>
><br>
> print header(),start_html("Simple Life Corp");<br>
> print align();<br>
> print end_html();<br>
<br>
</div>Sugiro que você comece a pensar em usar templates. Existem vários sistemas de template em Perl. Eu gosto do<br>
Template Toolkit(<a href="http://www.template-toolkit.org" target="_blank">http://www.template-toolkit.org</a>). Porque eu estou te falando nisso? Simples, porque é uma boa<br>
prática tentar separar código perl, ou da linguagem que for do código HTML.<br>
<br>
Uma boa metodologia para fazer isso é MVC(<a href="http://pt.wikipedia.org/wiki/MVC" target="_blank">http://pt.wikipedia.org/wiki/MVC</a>).<br>
<div class="Ih2E3d"><br>
><br>
> sub align<br>
> {<br>
> my $align = ();<br>
> return "<p align=center>$align</p>"<br>
> }<br>
> Olhe o start_html(), detnro dele posso por meu título, quis criar um<br>
> parecido s´o que com <p align=center> nao deu muito certo, gostaria de uma<br>
> orientação.<br>
> Obrigado.<br>
<br>
<br>
</div>Humm.. Não entendi o que você quer muito bem mas, novamente, parece que o intuito aqui é usar cgi para<br>
construir o que costumamos chamar de 'views'. Isso não é uma boa prática. Misturar código com HTML vai tornar<br>
sua vida bem mais complicada, mesmo que seja através de uma classe tão bacana como o CGI, do perl.<br>
<br>
De qualquer forma eu não entendi muito bem o seu problema, se você faz questão de aprender CGI desse jeito,<br>
poderia me explicar melhor o problema? Assim poderia ajudar.<br>
<br>
<br>
<br>
<br>
Cheers!<br>
<br>
> --<br>
<div class="Ih2E3d">> Daniel de Oliveira Mantovani<br>
> "A sede pelo aprendizado é insaciável"<br>
> <a href="http://mantovanihouse.blogspot.com/" target="_blank">http://mantovanihouse.blogspot.com/</a><br>
> ------------------------------------------------------------<br>
><br>
<br>
--<br>
</div><font color="#888888">André Garcia Carneiro<br>
Developer(Perl/PHP)<br>
Member of "São Paulo Perl Mongers" - <a href="http://sao-paulo.pm.org" target="_blank">http://sao-paulo.pm.org</a><br>
</font><div><div></div><div class="Wj3C7c"><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" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Daniel de Oliveira Mantovani<br>"A sede pelo aprendizado é insaciável"<br><a href="http://mantovanihouse.blogspot.com/">http://mantovanihouse.blogspot.com/</a><br>
------------------------------------------------------------<br>
</div>