if ( $database && $entities ) {
foreach my $entity ( keys %$entities ) {
my $url = $from;
- $url =~ s{/+$}{/};
+ $url =~ s{/?$}{/}; # add slash at end
$url .= $entity;
my $e = $self->client->get( $url )->res->json;
warn "# replicated $url ", dump($e);
$data->{$database}->{$entity} = $e;
+ delete $id2nr->{$database}->{$entity};
}
}
}
$self->render(text => $self->param('groovy'), layout => 'funky');
};
+get '/Cookbook' => 'Cookbook';
+
app->start;
__DATA__