print start_table({-border => '', -width => "100%"}),
  (
   $foo ?
   Tr(td('foo is set'), td('foo is still set')) :
   Tr(td('foo is not set'), td('foo is still not set'))
  ), end_table;