Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
<tr><tc colspan="2">1and2</tc><tc>3</tc></tr>
<tr><tc>1</tc><tc colspan="2">2and3</tc></tr>
<tr><tc>1</tc><tc>2</tc><tc>3</tc></tr>