Select Code to Download

print $q->Tr(
          $q->td($arrayef)
      );

print map { $q->Tr( $q->td($_) ) } @{$arrayref};