if ( !/^<exm>/ ) { $exmno = 0 };