Undefined subroutine &main::pnirt called