#!/usr/bin/perl -w
open (SSH, "|/usr/bin/ssh -T sim\@host");
print (SSH "myprog -a parameter\n");
close(SSH);