print table(map tr(map td($_), qw/foo bar baz/), 1..10)