Select Code to Download

#!/usr/bin/perl
use strict;
...
print $tb->body(0);
print $tb->body(1);
print $tb->body_rule('-','-');

| Planet  | Radius | Density |
|---------|--------|---------|
| Mercury |  2360  |   3.7   |
| Jupiter |  71030 |   1.3   |
------------------------------