my $conn_command = "ssh -l $user -p 22 $ip";
my $ct = Expect->spawn($conn_command) or die "Cannot spawn $conn_command: $!\n";