TFBS perl module