Select Code to Download

use strict;

...
        this\tis\ta\ttest
        of the best!
        END

sub Show_HTML {
    my $html = <<EOHTML;
...
    </BODY>
    </HTML>
  EOHTML