Select Code to Download

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

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

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

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