Select Code to Download

foreach (@files) {
print "<br> Delete this File: <INPUT TYPE=\"checkbox\" NAME=\"files\" 
+VALUE=\"$_\">\n";
}

foreach ($query->param('files')){
unlink($_);
}