#!/usr/bin/perl -w

use Net::SSH::Perl;
use strict;

my $ssh = Net::SSH::Perl->new("xx.x.xx.xxx");
$ssh->login("gbonner");
$ssh->cmd("cd AATv2");
$ssh->cmd("perl getEnvs.pl");