while (){ print "$_\n" if m/^192\.168\.[1-9][0-9]?\.\d+$/; }