snapshot of htgt's perl5