perl -e 'system("ssh", "-lusr", "remotehost", "date")'

##</code><code>##

perl -e 'system("ssh", "-l usr", "remotehost", "date")'