my perl at work is too old to use EXPECT modules and I need to write a script for users(for example user Joe) so that they can run it as userX(who has authrozied key in remote serverX who can auto ssh into the box(meaning no need to enter passwd) and run a simple script).

This then might be little more than perl question(but then perl is choice of people who use unix/linux so), will setting my script to setuid as userX will allow user joe to run the program to do what the script is intended to do(including auto login) or will i need something else? setting user environment or something or is this not possible

example:

sub dosomething{
     $yo = `ssh "$_[0]" grep XX /etc/hosts`;
     print "$yo\n";
}

dosomething();
[download]