![]() |
|
Problems? Is your data what you think it is? | |
PerlMonks |
Re^2: ssh with IO::Socket::INETby iburrell (Chaplain) |
on Nov 01, 2004 at 17:58 UTC ( #404362=note: print w/replies, xml ) | Need Help?? |
If you want the server written in Perl, you will need to write it. Net::SSH::Perl is client only. AFAIK, there is no SSH server implementation in Perl.
There are other solutions. One is to use SSH port forwarding. Your server listens for telnet or plain socket connections on localhost. SSH is used for the authentication and encryption. This forwards port 9000 on the localhost to 127.0.0.1 port 9000 on the remote host. I have used similar commands to foward rdesktop and VNC connections.
An alternative is to make your server into a program that runs on the command line. Then from a normal ssh shell prompt, run your command. You can even have the account automatically run your command. BTW, if you are really are on 127.0.0.1, there isn't much point in using SSH. The connection isn't going over the network so security isn't a problem.
In Section
Seekers of Perl Wisdom
|
|