Select Code to Download

#!/usr/bin/perl -w
use strict;
...
print "<br>@out<br>";
@out = push (@out, @newin);
print "<br>@out<br>";

<br>url<br><br><br><br>1<br>

<br>url<br><br><br><br>url<br>