Synthesis and characterization of poly[3-(butylthio)thiophene]: a regioregular head-to-tail polymer