Select Code to Download

#!/usr/bin/perl

...
print "---------------------------------------------------------------
+-----\n";

print $output;

<input value="abc" /> <b>abc</b> &nbsp; <b>abc</b>
<% abc ( '<input value="abc" /> abc &nbsp; abc <span> %>', $abc ); %>

<input value="abc" /> <b>abc</b> &nbsp; <b>abc</b>
<% <b>abc</b> ( '<input value="abc" /> <b>abc</b> &nbsp; <b>abc</b> <s
+pan> %>', $<b>abc</b> ); %>