my $get_version_prog = 'na_get_version.pl';
my $major_minor = qx($Bin/$get_version_prog $filer)

##</code><code>##

syslog('notice', "Version info for $filer $major_minor");
print STDOUT $major_minor;
exit 0;

##</code><code>##

syslog('debug', "OnTap major/minor for $filer is $major_minor");
##</code><code>##

Mar 23 15:38:51 sppubu01 snapaidd[639]: [ID 702911 local7.notice] Getting version info for SP1STONC02
Mar 23 15:38:53 sppubu01 snapaidd[639]: [ID 702911 local7.notice] Version info for SP1STONC02 1.31
Mar 23 15:38:53 sppubu01 snapaidd[636]: [ID 702911 local7.debug] OnTap major/minor for SP1STONC02 is