open(INPUT, "chr3and12.primerTXT"); while (){ if (/^"[wW]/){ s/"//g; s/\s//g; s/\n//; print "\n"; print; print "\t"; } elsif (/^"/){ s/"//g; s/\s//g; s///g; s/\\/\//g; s/\n//; print; print "\t"; } if (/^0,/){ s/^0,//; s/ bp//; s/\n//; print; print "\t"; } }