tu avevi scritto di non voler usare substr

perche in perl si scrive

$affermazione="mi chiamo Giovanni";

$r=index $affermazione," ";
$pronome=substr $affermazione,0,$r;

$affermazione=substr $affermazione,$r+1;

$r=index $affermazione," ";

$verbo=substr $affermazione,0,$r;

$nome=substr $affermazione,$r+1;

### finale ######

$affermazione=$pronome." ".$verbo." ".$nome;

# da provare