- or download this
my $pages = $data->{query}{pages};
my ($page_id) = keys(%$pages);
my $page = $pages->{$page_id};
my $extract = $page->{extract};
...
- or download this
my $pages = $data->{query}{pages};
my ($page) = values(%$pages);
my $extract = $page->{extract};
...
- or download this
my $pages = $data->{query}{pages};
for my $page_id (keys(%$pages)) {
...
my $extract = $page->{extract};
...
}
- or download this
my $pages = $data->{query}{pages};
for my $page (values(%$pages)) {
my $extract = $page->{extract};
...
}