3900 illumos will not build against gcc compiled perl

          --- old/usr/src/cmd/perl/contrib/Sun/Solaris/Ucred/Ucred.pm
          +++ new/usr/src/cmd/perl/contrib/Sun/Solaris/Ucred/Ucred.pm
   1    1  #
   2    2  # Copyright (c) 2004, 2008, Oracle and/or its affiliates. All rights reserved.
   3    3  #
   4    4  
   5    5  #
   6    6  # Ucred.pm provides the bootstrap for the Sun::Solaris::Ucred module.
   7    7  #
   8    8  
   9      -require 5.8.4;
        9 +require 5.0010;
  10   10  use strict;
  11   11  use warnings;
  12   12  
  13   13  package Sun::Solaris::Ucred;
  14   14  
  15   15  our $VERSION = '1.3';
  16   16  use XSLoader;
  17   17  XSLoader::load(__PACKAGE__, $VERSION);
  18   18  
  19   19  our (@EXPORT_OK, %EXPORT_TAGS);

  20   20  my @syscalls = qw(getpeerucred ucred_get);
  21   21  my @libcalls = qw(ucred_geteuid ucred_getruid ucred_getsuid ucred_getegid
  22   22          ucred_getrgid ucred_getsgid ucred_getgroups ucred_getprivset
  23   23          ucred_getpflags ucred_getpid ucred_getzoneid ucred_getprojid);
  24   24  
  25   25  @EXPORT_OK = (@syscalls, @libcalls);
  26   26  %EXPORT_TAGS = (SYSCALLS => \@syscalls, LIBCALLS => \@libcalls,
  27   27                  ALL => \@EXPORT_OK);
  28   28  
  29   29  require Exporter;
  30   30  
  31   31  use base qw(Exporter Sun::Solaris::Privilege);
  32   32  
  33   33  use Sun::Solaris::Utils qw(gettext);
  34   34  
  35   35  1;
  36   36  __END__

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX