...

case SVt_PVHV:
PerlIO_printf(PerlIO_stderr(),"PVHV%s\n", tmpbuf);
break;

...