Select Code to Download

#!/usr/bin/perl
use strict;
...

print "\n\nDone.\n\n";

<td width="10%" align="center"><input type="checkbox" name="EnBt0" val
+ue="checkbox" CHECKED > </td>

<td width="10%" align="center"><input type="checkbox" name="EnBt3" val
+ue="checkbox"   ></td>

<input type="button" value="Apply " onClick="toApply(document.Wanblock
+);">&nbsp;&nbsp;

$mech->click_button('Apply ');