[Rio-pm] Problema com perl

breno breno em rio.pm.org
Sexta Abril 17 10:32:21 PDT 2009


é relativamente nojento:

$ perl -MO=Deparse -e'print $_.$/for 0..10'
print $_ . $/ foreach (0 .. 10);

$  perl -MO=Deparse -E'say for 0..10'
BEGIN {
    $^H{'feature_say'} = q(1);
    $^H{'feature_state'} = q(1);
    $^H{'feature_switch'} = q(1);
}
;
say $_ foreach (0 .. 10);


Qual é o menor?  :-)


2009/4/17 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>:
> "-E" ativa Perl 5.10.
>
> 2009/4/17 Donato Azevedo <donatoaz em gmail.com>
>>
>> On 4/17/09, Marco Lima <braun.lima em gmail.com> wrote:
>> > Só para não perder o hábito! =P
>> >
>> > perl -E '$,=$/,say$_..10'
>>
>> say usa feature ou já é padrão em alguma versão nova?
>>
>> Donato
>> _______________________________________________
>> Rio-pm mailing list
>> Rio-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/rio-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"))'
>
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>


Mais detalhes sobre a lista de discussão Rio-pm