#!/usr/bin/env perl
use strict;
use warnings;
use Inca::Reporter::Version;
my $reporter = new Inca::Reporter::Version(
name => 'cluster.interactive_access.openssh.version',
version => 3,
description => 'Reports the version of openssh',
url => 'http://www.openssh.org',
package_name => 'openssh'
);
$reporter->addArg('ssh', 'ssh command', 'ssh');
$reporter->processArgv(@ARGV);
my $ssh = $reporter->argValue('ssh');
$reporter->setVersionByExecutable("$ssh -V", 'OpenSSH_([\w\.]+)|GSI ([\w\.\-]+)');
$reporter->print();
Click here to see help information for the cluster.interactive_access.openssh.version reporter.