Pessoal consegui fazendo da seguinte forma:<br> if( (s#^\s*V-TESTE##) <br> ou seja, substituindo o V-TESTE por NADA :)<br> nao sei se eh a melhor solucao.. mas funcionou!!<br><br><b><i>Igor Sutton Lopes &lt;igor@izut.com&gt;</i></b> escreveu:<blockquote class="replbq" style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"> On Tuesday 18 April 2006 19:55, Alceu R. de Freitas Jr. wrote:<br>(...)<br>&gt; Tem uma variável do Perl que possui o número da linha<br>&gt; atual. Alguém saberia dizer qual?<br><br>Segundo 'perldoc perlvar':<br><br>       $.      Current line number for the last filehandle accessed.<br><br>Igor.<br>_______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.org<br>http://mail.pm.org/mailman/listinfo/cascavel-pm<br></blockquote><br><p>
                <hr size=1> 
<a href="http://us.rd.yahoo.com/mail/br/tagline/mail/*http://br.info.mail.yahoo.com/">Abra sua conta no Yahoo! Mail</a> - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.