Select Code to Download

#!/usr/bin/perl
use strict;
...
<p>This is para1</p>
<p>This is para2</p>
</root>

<root
<con>
...
<p>This is para2</p>
</con>
</root>