my $page = $mw->get_page( { title => $pagename } );
              
          if(Dumper($page) =~ m/Daniel(.*?)world/) { 
                    print $1; 
                            }