perl -MLWP::Simple -le 'get("https://www.perl.org/get.html") =~ /latest stable version, currently ([\d\.]+)\./ and print $1'
5.24.1

##</code><code>##

perl -MLWP::Simple -le 'get("http://www.cpan.org/src") =~ /([\d\.]+)\s+<td>Maint/ and print $1'
5.24.1