Menu

#2 undeclared variable in sub SplitBigKey

open
nobody
None
5
2002-12-08
2002-12-08
Matt
No

I've been beating my head against the wall on this one,
but I'm just not finding the problem... but, every 30
minutes this is failing.
Version of ipaudit-web is ipaudit-web-0.96b6:

Subject: Cron <ipaudit@henry> cron/cron30min
X-Cron-Env: <SHELL=/bin/sh>
X-Cron-Env: <HOME=/home/ipaudit>
X-Cron-Env: <PATH=/usr/bin:/bin>
X-Cron-Env: <LOGNAME=ipaudit>

/home/ipaudit/ipaudit died prematurely
Use of uninitialized value in sprintf at ./MakeReport30
line 718, <STDIN> line
+37.
Use of uninitialized value in sprintf at ./MakeReport30
line 718, <STDIN> line
+37.
Use of uninitialized value in sprintf at ./MakeReport30
line 718, <STDIN> line
+37.

Here is the line:
$key = sprintf "%03d.%03d.%03d.%03d:%03d.%
03d.%03d.%03d:%d:%d:%d",
unpack ("CCCCCCCCCnn", $pack);

and the whole function:
sub SplitBigKey {
my ($pack) = @_;
my ($key);
$key = sprintf "%03d.%03d.%03d.%03d:%03d.%
03d.%03d.%03d:%d:%d:%d",
unpack ("CCCCCCCCCnn", $pack);
return split(/:/,$key);
}

Discussion

  • Mike Zanker

    Mike Zanker - 2003-02-01

    Logged In: YES
    user_id=702167

    All I can say is "me too". I always get this error message
    with Red Hat 8.0 - Red Hat 7.2 is fine. I wonder if it is
    anything to do with perl 5.8 which comes with RH 8.0?

    Any chance of this being looked into?

     
  • Nobody/Anonymous

    Logged In: NO

    I got the exact samt thing also with redhat 8

     
  • Nobody/Anonymous

    Logged In: NO

    Try turning off the warnings

    i.e. at the top of the file replace
    #!/usr/bin/perl -w
    with
    #!/usr/bin/perl

     

Log in to post a comment.