Select Code to Download

print 0+ @data;

print join "\n", map $_->as_HTML, @data;

for my $datum (@data) {
    print $datum->as_HTML, "\n";
}