C:\tmp>perl
my $ip = "csteppfw pts/0        2022-06-27 15:53 (192.168.5.100)";
$ip =~ s/.*\((\d+\.\d+\.\d+\.\d+)\).*/\1/;
print $ip;
__END__
192.168.5.100
C:\tmp>