my $command = "cssh -G -T 'OOPCSSH' -l username  $goto";
		my $dl = Expect->new();
		$dl->raw_pty(1);
		#$dl->log_stdout(0);
                $dl->spawn($command) or die "Cannot spawn $command: $!\n";
                #dl->expect(undef, "assword");
		sleep 5;
		$dl->send("$passwd\r");
                #$dl->expect(undef, "\$");
		#$dl->send("$passwd\r");
               #}