[LON-CAPA-dev] CHECK-RPM messages

[Mark Lucas]

I get the following during CHECK-RPM. 

Use of uninitialized value in string eq
at /home/httpd/lib/perl//Apache/lonnet.pm line 8550. (repeated 50+
times- once for each host)
Use of uninitialized value in string eq
at /home/httpd/lib/perl//Apache/lonnet.pm line 8550, <$config> line 4.
Use of uninitialized value in string ne
at /home/httpd/lib/perl//Apache/loncommon.pm line 8333.

          my ($id,$domain,$role,$name,$protocol)=split(/:/,$configline);
            $name=~s/\s//g;
            if ($id && $domain && $role && $name) {
                $hostname{$id}=$name;
                push(@{$name_to_host{$name}}, $id);
                $hostdom{$id}=$domain;
                if ($role eq 'library') { $libserv{$id}=$name; }
 >>>>           if ($protocol eq 'https') {
                    $protocol{$id} = $protocol;
                } else {
                    $protocol{$id} = 'http';
                }
            }
 
It used to show up once, but now shows up a bunch of times (Presumably
it is now iterating over the whole table). It is most likely complaining
that $protocol doesn't exist since most of us don't have some at the end
of our host entry. 

I tried this simple code:
#!/usr/bin/perl
use strict;

my $configline="oucapa2:ohiou:library:capa2.phy.ohiou.edu";
my ($id,$domain,$role,$name,$protocol)=split(/:/,$configline);
if ($protocol eq 'https') {
    print "https\n";
} else {
    print "http\n";
}

and it works on my fedora desktop.

Any thoughts as to why this is complaining when it is run using
CHECKRPMS as an external process?

The failure on loncommon regards a similar situation with defmail.

Anyone else seeing this in their mail from CHECK-RPMS?

Later,
Mark
-- 
Mark Lucas                                      email: lucasm@ohiou.edu
252D Clippinger Lab                             phone: (740)597-2984
Department of Physics and Astronomy             fax:   (740)593-0433
Ohio University
Athens, OH 45701