• # Re: Perl en ligne de commande

    Posté par . En réponse à la dépêche Perl en ligne de commande. Évalué à 10.

    perl -lane 'print $F[0] + $F[-2]'

    devient en Ruby
    ruby -ne 'puts split[0]+" "+split[-2]'

    perl -ne 'print if 15 .. 17'
    -> ruby -ne 'puts if 15..17'

    perl -ne 'print unless 10 .. 20'
    -> ruby -ne 'puts unless 15..17'

    perl -ne 'print if /^START$/ .. /^END$/'
    -> je sais pas le faire :-( (en une ligne)

    perl -ne 'print unless /^START$/ .. /^END$/'
    -> idem :-((

    perl -ne 'print if $.>= 15; exit if $.>= 17;'
    -> ruby -ne 'puts $_ if $.>= 15; exit if $.>= 17'

    etc etc ...

    C juste histoire de montrer aux Perleur que Ruby est aussi pratique. Et aux Pythons codeurs que l'on peut faire de l'objet sans se prendre la tête.