sub run_command {
    my $user = 'gmon';
    my $system = shift;
    my $protocol = 'ssh';
    my $ssh_flags = "-l $user";
    my $command = "statvv -ni";
    my $do_command = "$protocol $ssh_flags $system $command";
    print "Running [$do_command]\n";
    my @results = `$do_command`;
    return @results
}