There surely isn't anything in core perl that does that for you. There might be something on CPAN, but since you are more familiar with the matter than I am, your chances of finding something fitting are higher than mine.

But since this is a rather special topic, it could very well be that such a thing doesn't exist pre-made for you.