$ntext = (split (/;/)) [0];
   $ntext =~ s/n01//g;