http://www.perlmonks.org?node_id=1060127


in reply to Switch user command not working user Net:SSH2 module

Net::SSH2 runs every command in a different shell session. Read the FAQ entry "Can't change working directory" from the Net::OpenSSH docs for a more detailed explanation.

There are two ways to do what you want:

One is to start a shell on the remote shell and then simulate an interactive dialogue with it (usually, you use Expect for that, though Expect doesn't work on Windows*). This is hard and error prone, as you will have to look into the command output for the prompt in order to detect when some command is done.

The other way is to combine the sequence of commands into a single one. But, su usually asks for the password and so you will have to send it through its tty.

su root -c "whoami"

An easier way is to use sudo, that can be configured to not ask for a password, or alternatively, in recent versions, to get the passwords from stdin. For instance, using Net::SSH::Any:

my $ssh2 = Net::SSH::Any->new('192.168.XX.XXX, user => 'root', passwor +d => 'root'); print $ssh2->capture({stdin_data => "$sudo_passwd\n"}, 'sudo', '-Sk', '-U', $user, '-p', '', '--', 'whoami');

*) unless you use the perl from Cygwin.