Perl_NCL_IGM