[apache@svn-old RGT3]$ /usr/local/bin/perl    /usr/local/apache2/htdocs/RGT3/demandbuild-hotel.pl Hotel3.0 patch 14629 D ReleaseNotesCCR_14629D.txt emailid 201209171312
Not a subroutine reference at Modules/Util.pm line 35.
Compilation failed in require at Modules/CheckCCRfiles.pm line 6.
BEGIN failed--compilation aborted at Modules/CheckCCRfiles.pm line 6.
Compilation failed in require at /usr/local/apache2/htdocs/RGT3/demandbuild-hotel.pl line 8.
BEGIN failed--compilation aborted at /usr/local/apache2/htdocs/RGT3/demandbuild-hotel.pl line 8.

##</code><code>##

no  warnings;
use diagnostics -verbose;
enable  diagnostics;

##</code><code>##

sub _load_constants {
    my %constants;
    foreach my $constant (@Modules::Constants::EXPORT,@Modules::Constants::EXPORT_OK)
    {
        if (defined &{$Modules::Constants::{$constant}})
        {
            $constants{$constant} = [&{$Modules::Constants::{$constant}}];
            if (scalar(@{$constants{$constant}}) == 1)
            {
                $constants{$constant} = @{$constants{$constant}}[0];
            }
        }
    }
    return \%constants;
}
my $CONSTANTS_ref = _load_constants();

##</code><code>##

perl  NWCLARK/perl-5.8.6.tar.gz                    : make NO isa perl