Added perl script to add strand information to a bed file