use strict;
use warnings;
use feature 'say';
use WWW::Mechanize;

my $ua = WWW::Mechanize->new;
$ua->get('https://perlmonks.org');
say $ua->content(format => 'text');