perl -lne '/^.{1,12}/; printf "%-12s\n",$&' myfile