Select Code to Download

#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
...
    </html>

bob

my $body = "1234567890";

my $body = "12345678901234567890";