TOC for perl