note
hippo
<p>I guess you mean something like the below. Obviously add your own error handling but this should point you in the right direction I would hope.</p>
<code>
#!/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";
</code>
11118766
11118766