Don't leave dangling temp file if connection is lost

diff --git a/updown/fetch.cgi b/updown/fetch.cgi
index 960af11..8bccd25 100755 (executable)
--- a/updown/fetch.cgi
+++ b/updown/fetch.cgi
@@ -50,11 +50,11 @@ if ($ENV{'PATH_INFO'}) {
                print "Content-size: $st[7]\n";
                print "Content-type: application/zip\n\n";
                open(FILE, $temp);
+               unlink($temp);
                while(<FILE>) {
                        print $_;
                        }
                close(FILE);
-               unlink($temp);
                }
        else {
                # Work out the type