Select Code to Download

#!/usr/local/bin/perl -w
use strict;
...
        $_[0] =~ s/&lt;/</g;
        $_[0] =~ s/&gt;/>/g;
}

LINE:[<br>&lt;/pre&gt;<br>&lt;img src=http://blah.microsoft.com/analog
+_sc/bp/_lessons_learned/2788_1.jpg&gt;<br>&lt;br&gt;<br>&lt;img]
LINE:[<br></pre><br><img src=http://blah.microsoft.com/analog_sc/bp/_l
+essons_learned/2788_1.jpg><br><br><br><img]