while(/hops(.+)Trace/mg){
    print $1, "\n" if /($RE{net}{IPv4})/;

##</code><code>##

print "$1\n" for /($RE{net}{IPv4})/g;