Select Code to Download

$html .= $q->table(
    { -bgcolor => '#ffffff',
...
            ]
          )
);

$html .= $q->table(
    { -bgcolor => '#ffffff',
...
          ) 
        } sort keys %{ $data }
);