<div>Ola lista,</div>
<div> </div>
<div>conforme pedi ajuda anteriormente para poder fazer um sistema de login, estou implementando e testando e deparei com o seguinte error:</div>
<div> </div>
<div>vamos ao codigo para ficar mais facil de entender:</div>
<div> </div>
<div>&lt;-Script-&gt;</div>
<div>
<p>#!/usr/bin/perl</p>
<p>use CGI;<br>use CGI::Carp qw(fatalsToBrowser);<br><br>my $query = CGI-&gt;new;</p>
<p>$cgi = new CGI;</p>
<p>if ($cgi-&gt;cookie(&#39;sid&#39;)) { #caso o cookie exista, imprimo<br>        print $query-&gt;header;<br>        print &quot;Cookie ativo!&quot;;</p>
<p>print $cgi-cookie(&#39;sid&#39;); #meu cookie</p>
<p>} else { #se não existe, ele grava</p>
<p>$cookie = $cgi-&gt;cookie( -name=&gt;&#39;sid&#39;, -value=&gt;&quot;$sid&quot;, -expires=&gt;&quot;+5m&quot;,-secure =&gt;0,-path=&gt;&#39;/&#39;);<br>print $cgi-&gt;header(-cookie=&gt;$cookie); #imprimo o cookie no navegador</p>

<p>print &quot;Gravando cookie.... ok, salvo!&lt;br&gt;<br>Atualize seu navegador&quot;;</p>
<p>} #fecho o else<br></p>
<p>eu executo o script login.cgi ele checa se ja tem cookie caso nao ele cria, porem ele nao esta criando, pois se eu atulizar o script ele sempre vem &quot;Gravando cookie.... ok, salvo!<br>Atualize seu navegador&quot;</p>

<p>Tem alguma coisa de errado?</p>
<p> </p>
<p>[]&#39;s Sammuel</p></div>