my $var = `telnet 192.168.1.1`;
$var =~ s/192.168.1.1//;
print $var;