Select Code to Download

# Ooops!
print join ",", @foo, "\n";
...
    map {
        tr(td($_->[0]), td($_->[1])) } @foo,
        ...

# De-oopsed.
print join(",", @foo), "\n";
...
    map({
        tr(td($_->[0]), td($_->[1])) } @foo),
        ...