using Net::SSH::Any; //perl code my $ssh = Net::SSH::Any->new($ssh_url, user => $ssh_user, password => $ssh_pwd); my $cmd1 = "findbug -p $project | dumpbug -fnt $template_file_path"; $ssh->system({ stdout_fh => $fh}, $cmd1) or $logger->logdie("Connecting failed"); print "output is $project"; //perl code