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

##</code><code>##

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