#!/usr/bin/env perl 
use strict;
use warnings;
use LWP::UserAgent;
use Digest::SHA 'sha256_hex';

my $response = LWP::UserAgent->new->get ('https://www.perlmonks.org/?node_id=11118766');
my $digest  = sha256_hex ($response->decoded_content);
print "The digest is '$digest'\n";