Select Code to Download

$VAR1 = [
          'Status',
...
          'Node Name',
          'Domain Name',
        ];

$VAR1 = [
          'á',
...
          'Activity',
          'Bytes Transferred'
        ];

use HTML::TreeBuilder;
use Data::Dumper;
...
</TABLE> </DIV></TD>
  </TR></TABLE>