Skip to content
Permalink
Browse files

Release memory at the end

  • Loading branch information...
nigelhorne committed Oct 9, 2019
1 parent 09d2e2a commit 58804ca5ada8d07c5cdb3f421935d02ccf7cef46
Showing with 8 additions and 0 deletions.
  1. +8 −0 ged2site
@@ -812,6 +812,8 @@ if(scalar(%censuses)) {
print $html '</ul></body></html>';
close $html;
close $csv;

undef %censuses;
}

if(scalar(%all_locations)) {
@@ -879,6 +881,8 @@ if(scalar(%all_locations)) {
$body =~ s/>/&gt;/g;
print $locations_xml "\t</maps>\n\t<body>$body</body>\n</locations>\n";
close $locations_xml;

undef %all_locations;
}

if(scalar(%military)) {
@@ -894,6 +898,8 @@ if(scalar(%military)) {
}
}
close $csv;

undef %military;
}

if(scalar(%changes)) {
@@ -1002,6 +1008,8 @@ close $csv;
print $html '</ul></body></html>';
close $html;

undef $surnames;

if((!defined($key)) && defined($config)) {
$key = $config->{'google_verification'};
}

0 comments on commit 58804ca

Please sign in to comment.
You can’t perform that action at this time.