my $dynamisch = # hier den Code um die Nummer zu holen ....;

my $text = $perl_data->{'query'}->{'pages'}->{$dynamisch}->{'extract'};