Unix Revolution

I know close to nothing about Per l .  This script was created on RHEL 5 an d I wanted t he functi onality to be extended to RHEL 6.   In regards to our script t he signif icant differen ces between RHEL 5 and 6 are: RHEL 5 /dev/mpath     -- path to m ultipath devices  \_                   -- identifier for multipath device RHEL 6 /dev/mapper   - - path to m ultipath devices   |-                   -- identifier for multipath device   `-                  -- identifier for multipath device   #!/usr/bin/perl @rhelver = `cat /etc/redhat-release`; $rhelver[0] =~ / (\d\.\d) /;      $RELEASE = $1; # ARRAY OF HDS ARRAYS $sxm_arrays = {   '726a'=>'ITSHDS0...