#!/usr/bin/perl

use strict;
use warnings;

use Net::SSH qw(ssh ssh_cmd issh sshopen2);

my $command="special_command";

my $re = ssh_cmd('user@server', $command);

print $re;