print Tr( start_form(-action => url()), hidden(-name => "hidden", -value => $row), td($row->[0]), td($row->[1]), td($usage), td($cumu_usage), td(submit(-name => "choice", -value => "Delete")), end_form(), );