How can I ssh inside a Perl script?

后端 未结 9 1040
猫巷女王i
猫巷女王i 2020-12-09 12:14

I want to SSH to a server and execute a simple command like \"id\" and get the output of it and store it to a file on my primary server. I do not have privileges to install

9条回答
  •  -上瘾入骨i
    2020-12-09 13:08

    You can always install modules locally, and that is the method you should look into; however, you should be able to get away with

    #!/usr/bin/perl
    
    use strict;
    use warnings;
    
    my $id = qx/ssh remotehost id 2>&1/;
    
    chomp $id;
    
    print "id is [$id]\n"
    

提交回复
热议问题