Thursday, February 23, 2006

PERL - Compter les caractères dans une variable $var

my $count = ($var =~ tr/[0-9a-zA-Z]//);