FAQ PerlConsultez toutes les FAQ

Nombre d'auteurs : 18, nombre de questions : 250, dernière mise à jour : 29 octobre 2015  Ajouter une question

 

Bienvenue sur la FAQ Perl. Cette FAQ a pour vocation de vous enseigner ou de vous faire revoir les notions élémentaires de ce fantastique langage. Perl est très utilisé dans différents domaines depuis la gestion système, le réseaux, l'administration de bases de données, le web (CGI), la bureautique, la conception d'interfaces graphiques ou des contextes scientifiques telle la bioinformatique. Nous espérons que cette FAQ vous sera d'une grande utilité.

Vous souhaitez participer à l'amélioration de cette FAQ, n'hésitez pas !! Commentez

Bonne lecture !


SommaireCodes sources utilesDes codes sourcesQuelques unilignes perlDivers (2)
précédent sommaire suivant
 



Voici comment tester si un nombre est premier (code d'Abigail).

Code perl : Sélectionner tout
perl -wle "print qq{Premier} if (1x shift) !~ /^1?$|^(11+?)\1+$/" NOMBRE


Code perl : Sélectionner tout
perl -wle 'print "Premier" if (1x shift) !~ /^1?$|^(11+?)\1+$/' NOMBRE

Mis à jour le 22 février 2011 djibril

Pour constituer une grille Euromillions, on doit choisir 5 nombres entre 1 et 49 et 2 « étoiles » entre 1 et 11. Perl à la rescousse :

Code : Sélectionner tout
1
2
3
4
$ perl -E 'for ([5, 49], [2, 11]) { my %h; ++$h{1 + int(rand($_->[1]))} while keys %h != $_->[0]; say "@{[keys %h]}"}' 
26 32 15 28 35 
11 4 
$

Mis à jour le 29 octobre 2015 cmcmc

Proposer une nouvelle réponse sur la FAQ

Ce n'est pas l'endroit pour poser des questions, allez plutôt sur le forum de la rubrique pour ça


Réponse à la question

Liens sous la question
précédent sommaire suivant
 

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2017 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.

 
Responsable bénévole de la rubrique Perl : djibril -