use strict;
use warnings;
use feature 'say';
use Mojo::UserAgent;

my $ua = Mojo::UserAgent->new;
say $ua->get('https://www.perlmonks.org')->res->dom->all_text;