use Net::SSH qw(sshopen2);
use strict;

  my $user = "flexpm";
  my $host = "155.226.230.99";
  my $cmd = "ls";

  sshopen2("$user\@$host", *READER, *WRITER, "$cmd") || die "ssh: Error $!";

  while (<READER>) {
      chomp();
      print "$_\n";
  }

  close(READER);

##</code><code>##

D:\Projects\Cingular\Test>perl test.pl
Host key verification failed.


##</code><code>##

C:\Documents and Settings\RAJARAJESWARI\Desktop\Net-SSH-0.08>nmake test

Microsoft (R) Program Maintenance Utility   Version 1.50
Copyright (c) Microsoft Corp 1988-94. All rights reserved.

        C:\Perl\bin\perl.exe "-Iblib\lib" "-Iblib\arch" test.pl
1..1
ok 1

C:\Documents and Settings\RAJARAJESWARI\Desktop\Net-SSH-0.08>nmake install

Microsoft (R) Program Maintenance Utility   Version 1.50
Copyright (c) Microsoft Corp 1988-94. All rights reserved.

Appending installation info to C:\Perl\lib/perllocal.pod