perl에서 이것을 어떻게 해석 해야 하나요

PERL="Unknown"
path_userperl=`echo $PATH | sed -e 's/:/ /g'`
for perl_path in  $path_userperl ; do
    userperl=$userperl" "$perl_path/perl
    userperl=$userperl" "$perl_path/Perl
done
for perl_path in $userperl $ATRIAHOME/bin/Perl $CLEARCASEHOME/bin/Perl /usr/atria/bin/Perl /opt/rational/clearcase/bin/Perl ../bin/Perl ../../../bin/Perl; do
    if [ -x "$perl_path" ] ; then
        # Found the name, is it good enough for our task?
        TEST_INTERP=`$perl_path -e 'require 5; print "Good" if ($] =~ /5\.00[0-3]/);' 2>&1`
        if [ "$TEST_INTERP" = "Good" ] ; then
            PERL=$perl_path
            break
        fi
    fi
done

install program에서 있는건데,
perl의 버전이 5.0이상인지를 확인 하는 스크립트인데...
Perl 5.6.0에서는 찾아내고 Perl5.8.0에서는 찾지를 못합니다.
무슨 이유가 있나요...
아니면 애초에 다른 문제인가요?
알려주세요

TEST_INTERP=`$perl_path -e 'require 5; print "Good" if ($] =~ /5\.00[0-3]/);' 2>&1`

특히 이부분을 모르겠네요