Perl est un langage de programmation dynamique de haut niveau, à usage général et procédural, connu pour son support natif des expressions régulières et des capacités d'analyse de chaînes. Veuillez utiliser cette balise pour les questions sur Perl en général. Pour les choses liées au nouveau langage (mais apparenté) Raku (anciennement "Perl 6"), veuillez utiliser la balise raku. Pour les expressions régulières de style Perl dans d'autres langages, utilisez la balise regex ou, si elles sont basées sur la bibliothèque PCRE, la balise pcre.
J'ai écrit la fonction rmlz pour supprimer tous les zéros non significatifs de la chaîne. # remove all leading zeroes from string
use strict;
use warnings;
...
J'ai une chaîne qui provient d'un fichier CSV: 'NA19900,4,111629038,0;0,0;0,"GSA-rs16997168;rs16997168;rs2w34r23424",C,T,0,0,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0';
qui devrait &eci ...
