[Cascavel-pm] Script Perl para ler arquivo PHP

[Pedro César]

Valeu Daniel, obrigado.



2009/4/8 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>

> Pedro que tal aprender lendo coisas divertidas ?
> Perl tem uma ótima documentação auto explicativa, alguns desses documentos
> estão traduzidos,
> você pode encontra-los aqui:
> http://www.perl.org.br
>
> Comece lendo a introdução:
> http://www.perl.org.br/Perldoc/V500807/Perlintro
>
> Depois de ler, se tiver dúvidas pergunta!
>
> Ótimos estudos!
>
> []'s
>
> 2009/4/8 Pedro César <pedrocesar em tecdom.com.br>
>
> Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus primeiros.
>>
>> Vê só, já que você me deu a "brecha" vou pedir duas coisas, a primeira é
>> comentar o código que você me fez, basicamente não entendi por exemplo o
>> "my" na frente do $file e o q{<} no open.
>>
>> A segunda é que gostaria que me mostrasse como usar o modulo sugerido,
>> pois o acesso é remoto mesmo, se puder fazer o código e comentar, me ajuda
>> muito.
>>
>> Muitíssimo obrigado desde ja.
>>
>> 2009/4/8 Otávio Fernandes <otaviof em gmail.com>
>>
>> Olá Pedro,
>>>
>>> Estou vendo, realmente, que você está começando com Perl. Bom,
>>> primeira coisa, você está passando uma URI para acessar o arquivo...
>>> acredito que você está rodando o script no mesmo servidor onde este
>>> arquivo se encontra, então, você tem que passar path para acessar
>>> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
>>> ficaria assim (com algumas melhorias):
>>>
>>> #!/usr/bin/env perl
>>>
>>> use strict;
>>> use warnings;
>>>
>>> my $file = q{/var/tmp/arquivo.php};
>>>
>>> open( my $FH, q{<}, $file ) or die $!;
>>> while( <$FH> ) {
>>>    print;
>>> }
>>> close( $FH );
>>>
>>> __END__
>>>
>>> Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
>>> pode usar o módulo LWP (por exemplo).
>>>
>>> Dúvidas? Pergunta ai.
>>>
>>> um abraço,
>>>
>>> --
>>> Otávio Fernandes <otaviof at gmail.com>
>>> http://otaviof.blogspot.com/
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Pedro César
>> Analista de Suporte
>> Microsoft Certified Professional - MCP
>> Blog: www.tecdom.com.br/blog
>> Fone: 82-9317-8802
>> msn: pedrocesar em tecdom.com.br
>> Registered Linux User #282860
>>
>>
>> "Autoridades são alguns,
>> e só por algun tempo.
>> Enquanto cidadãos somos todos nós,
>> e durante toda a vida".
>> Prof. Hugo de Britto Machado
>>
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> http://mantovanihouse.blogspot.com/
> This is my poney:
> -------(\_------------_/)-----------
> -------)--(----------)--(-----------
> ------(----(---------)----)----------
> -------)----(-------)----(-----------
> -------(----(-------)----)-----------
> --------\_-(\\.---.//)-_/------------
> ----------\)' -8--8- '(/--------------
> -----------/------------\---------------
> ----------(--)--------(--)--------------
> ------------(_c__c_)----------------
> ----------------------------------------
> perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("
> http://www.perl.org.br"))'
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090409/94479d1a/attachment-0001.html>