($final_gset[$i]), $tmps;

##</code><code>##

if (/POLYMORPH/)
   $final_gset[$i] = <IN>;
}

##</code><code>##

use strict;
use warnings;