#! /bin/sh
PLATFORM="$(uname)"
OS_LEVEL="$(uname -v)"
if [ "${PLATFORM}" == "AIX" ] && [ "${OS_LEVEL}" == "6" ]
then
   if [ -e /opt/freeware/bin/perl ]
   then
        PERL_VERSION="$(/opt/freeware/bin/perl -e 'print substr($^V, 1)')"
        if [ $PERL_VERSION -ge 5.10.1 ]
        then
          /opt/freeware/bin/perl /usr/sbin/ntp4/ntptrace4_base $@
        else
          echo "Please install latest version of Perl from AIX Toolbox. (https://www-03.ibm.com/systems/power/software/aix/linux/toolbox/alpha.html#P)"
        fi
    else
        echo "Please install latest version of Perl from AIX Toolbox. (https://www-03.ibm.com/systems/power/software/aix/linux/toolbox/alpha.html#P)"
    fi
else
  /usr/bin/perl /usr/sbin/ntp4/ntptrace4_base $@
fi