use strict;
use warnings;

my @lines = ( "ip:192.168.243.1", "ip:192.168.243.2" );

for ( @lines ) {
    print "$1\n" if /(ip:[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})/;
    }