Select Code to Download

#!/usr/bin/perl

...

print "</body>";
print "</html>";

foreach (@data){
  print $_;
}

#!/usr/bin/perl
use strict;
...
print "</body>";
print "</html>";