d:\pm\perl mb.pl
Your type is 'intp'