oui, la question principale était que le nombre (dans l'exemple au-dessus de « 34 ») est stocké dans $1.
si vous voulez un en trait plein essayer quelque chose comme
$ret = "" ;
tandis que ()
{
$_=~/^ [^ \ d] + (\ d+) [\ W \ W] + ;
$ret. = $1. « « ;
}
/* maintenant $ret contiendra tout le 34's dans une ligne séparée par les espaces. *