Select Code to Download

  <column>Colum <b>One</b> Header</column>
  <column>Column <u>Two</u> Header</column>
  <column na="1">Etcetera</column>

use HTML::TokeParser;
sub parse_column_list {
...
  }
  return \@cl;
}