# If the form was properly submitted, save the data
if ($input{"go"} eq "DELETE") {

print button(-name=>'Delete',
                          -value=>'DO you really want to delete it ?',
                          -onClick=>"return confirmOk()");

$query = "DELETE ....