Select Code to Download

print "<input type=hidden name= 'index'  value='$i'>";
print "<input type=hidden name='uname' value='$nme'>";
print "<input type='image' src='http://typhoon.he.net/~bthcraft/$nme/i
+mages/tn_$dat->[$i]->[2]' name='image' height ='$heigh$

print hidden("index",$i), 
       hidden("uname", $nme),
...
                    -src    => "http://typhoon.he.net/~bthcraft/$nme/i
+mages/tn_$dat->[$i]->[2]",
                    -height => $height,
                    -width  => $width);