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