[SP-pm] Remover a primeira linha de arquivo com Perl

[Alexei Znamensky]

golf! golf! golf! golf!

2012/9/2 Stanislaw Pusep <creaktive em gmail.com>

> $ perl -MO=Deparse -pi -e '$_ = "" if ($. == 1);'
> BEGIN { $^I = ""; }
> LINE: while (defined($_ = <ARGV>)) {
>     $_ = '' if $. == 1;
> }
> continue {
>     die "-p destination: $!\n" unless print $_;
> }
> -e syntax OK
>

explicitamente:
perl -e '$descarte = <>; while(<>) { print }' filename

implicitamente:
perl -pe 'BEGIN {<>}' filename


> ABS()
>
>
>
> 2012/9/2 Jose Nilton <jniltinho em gmail.com>
>
>>
>> Olá todos,
>>
>> Estou precisando remover a primeira linha de um arquivo de texto.
>>
>> Achei esse link:
>>
>> http://www.unix.com/unix-dummies-questions-answers/17622-how-remove-first-line-flat-file.html
>>
>> perl -pi -e '$_ = "" if ($. == 1);' filename
>>
>> Como posso colocar isso no meu código ?
>>
>> Obrigado
>>
>>
>> --
>>
>> ..............................................................................
>> *Com Deus todas as coisas são possíveis* ::: LinuxPro<http://www.linuxpro.com.br>
>>
>> *"A qualidade nunca se obtém por acaso; ela é sempre o resultado do
>> esforço inteligente." (John Ruskin)
>> "A mente que se abre a uma nova ideia jamais volta ao seu tamanho
>> original" (Albert Einstein)*
>>
>>
>> =begin disclaimer
>>    Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>>  SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>>  L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>> =end disclaimer
>>
>>
>
> =begin disclaimer
>    Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>  SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>  L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
>


-- 
Alexei "RUSSOZ" Znamensky | russoz EM gmail com | http://russoz.org
GPG fingerprint = 42AB E78C B83A AE31 7D27  1CF3 C66F B5C7 71CA 9F3C
http://www.flickr.com/photos/alexeiz | http://github.com/russoz
"I don't know... fly casual!" -- Han Solo
-------------- Pr�xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20120902/f1817508/attachment.html>