A Modern Perl Framework for High Throughput Sequencing analysis