--- a/once.pl Thu Dec 24 00:49:28 2015 +0100
+++ b/once.pl Thu Dec 24 01:26:00 2015 +0100
@@ -277,26 +277,8 @@
push @{ $tt{files} }, \%file;
}
- $tt->process('inventory.html', \%tt) or die $tt->error();
- return 0;
-
}
-
- print start_multipart_form, start_table,
- Tr(td("Dateiname: "),
- td(filefield(-name => "upload", -default => "nothing")),
- ),
- Tr(
- td("Löschen in: "),
- td(textfield(-name => "expires", -default => 0)),
- td("Tagen (0: unmittelbar nach Download; -1: nur manuell)")
- ),
- Tr(td(), td(submit(-value => "Hochladen")),),
- end_table,
- end_multipart_form,
- @footer,
- end_html;
-
+ $tt->process('inventory.html', \%tt) or die $tt->error();
return 0;
}