Depending on how interactive you want things to be, Net::SSH2 and/or Net::SSH::Any allow you to run anything from a script.
As a general approach, why use a suid script when you can configure special SSH keys together with a premade command so that you can trigger a specific command directly as root? See the authorized_keys manpage on the command= entry.
In reply to Re: Perl terminal access to linux server
by Corion
in thread Perl terminal access to linux server
by Polyglot
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |