( my $url = join '/', split //, $id ) =~ s{(.*)/}{$base_url/$1/$id/$id-h/$id-h.htm}s;