I don't think there is a standard way of determining your outside IP address, if only because there may be many different adresses for different interpretations of "outside".
what you're doing now seems like a reasonable approach.
$content =~ s/.*Current IP Address: ([\d.]+).*/$1/;
should filter the address.