perl -MActivePerl::DocTools -e "ActivePerl::DocTools::WriteTOC()"