Data Transpose Perl module