Ciao! nelle regexpr, non c'č bisogno dei backslash all'interno delle [] per fare l'escape dei quantificatori. quindi io direi che il tuo codice diventa: while(<>) { $cnt++ if /[.?!][^.]/g; } print $cnt; cosė a occhio direi che č a posto. fammi sapere, Andrea