This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Now that we have the full path, we can skip the which call,
[perl5.git] / hints / hpux.sh
index c74b66a..7a95841 100644 (file)
@@ -157,7 +157,7 @@ case `$cc -v 2>&1`"" in
                done
            [ -z "$cc_found" ] && cc_found=`which cc`
            what $cc_found >&4
-           ccversion=`which $cc_found | xargs what | awk '/Compiler/{print $2}/Itanium/{print $6,$7}'`
+           ccversion=`what $cc_found | awk '/Compiler/{print $2}/Itanium/{print $6,$7}'`
            case "$ccflags" in
                "-Ae "*) ;;
                *)  ccflags="-Ae $cc_cppflags"