Select Code to Download

$text =~ s/<.+?>//g;
push @array, $text;

for (@array) {print '<b>' . $_ . '</b>'}