je ne sais pas d'ou vient cette repuation ...
j'ai pondu plusieurs dizaines de milliers de lignes de code en Perl et souvent j'arrive a les relire et parfois meme a comprendre ce que ca fait !
serieusement : tu peux coder comme un goret dans tous les langages mais personne ne t'y oblige.
Le gros avantage de Perl, c'est sa souplesse et ses modules.
Un petit A++ pour la route (c'est de moi et ca se trouve sur http://paris.mongueurs.net/aplusplus.html ) ? Récursions chaînées
$;=sub{
sub _{
$_[2]=substr($_[0],length($_[0])-1,1) + $_[1];
if (length($_[2])>1 or length($_[0])>1){
$_[2]= _(substr($_[0],0,length($_[0])-1),length($_[2])>1?substr($_[2],0,1):0)
. substr($_[2],length($_[2])-1,1);
}
return ($_[2]);
}
$A=_($_[0],1);
};($A)->$;;
[^] # Re: Perl ?
Posté par arthurr (site web personnel) . En réponse au journal Quel langage pour un non informaticien?. Évalué à 1.
j'ai pondu plusieurs dizaines de milliers de lignes de code en Perl et souvent j'arrive a les relire et parfois meme a comprendre ce que ca fait !
serieusement : tu peux coder comme un goret dans tous les langages mais personne ne t'y oblige.
Le gros avantage de Perl, c'est sa souplesse et ses modules.
Un petit A++ pour la route (c'est de moi et ca se trouve sur http://paris.mongueurs.net/aplusplus.html ) ?
Récursions chaînées
$;=sub{
sub _{
$_[2]=substr($_[0],length($_[0])-1,1) + $_[1];
if (length($_[2])>1 or length($_[0])>1){
$_[2]= _(substr($_[0],0,length($_[0])-1),length($_[2])>1?substr($_[2],0,1):0)
. substr($_[2],length($_[2])-1,1);
}
return ($_[2]);
}
$A=_($_[0],1);
};($A)->$;;