wrlog "getting directory " . $edir;
	my $resp = $LWP->get($baseurl . $edir);
	if ($resp->is_success) {
		my $twig = XML::Twig->new;
		if (!$twig->safe_parse($resp->content)) {
			wrlog "error xml parsing directory listing of " . $edir . " as xml: " . $@;
			return;
		}
		my($etitle) = $twig->findnodes("//title");
		if (!$etitle || $etitle->text !~ /\A\s*Index\b/i) {
			wrlog "direcotry listing has wrong title " . $edir;
			return;
		}
		for my $ea ($twig->findnodes("//a")) {
			my $href = $ea->att("href");
			my $n = unescape($href);
			if (defined($n) && $n !~ m"\A[\?\/]") {
				#wrlog "found link from directory " . $edir . " : " . escape($n);
				my $isdir = $n =~ s"\/+\z"";
				my $abs = $dir . $n;
				my $eabs = escape($abs);