[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

rootlogin.pl

I installed the rootlogin.pl and it wasn't working for a bit until I put the
actual $BBHOME directory in the hobbitlauch.cfg for the rootlogin.pl entry.
But now when I look at the rootlogin.log file I am getting these errors:

 

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 102879.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 103303.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 103673.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 104351.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 105102.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 105945.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 106447.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 106861.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 107535.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 108031.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 108397.

Use of uninitialized value in concatenation (.) or string at
/opt/hobbit/server/ext/rootlogin.pl line 76, <STDIN> line 108912.

 

And line 76 is this:

 

62         elsif ($line =~ /^\ (at) \@/) {

 63                 # End of a message. Do something with it.

 64                 processmessage();

 65         }

 66         elsif ($line =~ /^\[(.+)\]/) {

 67                 # Start of new message section.

 68

 69                 $cursection = $1;

 70                 $sections{ $cursection } = "\n";

 71         }

 72         else {

 73                 # Add another line to the entire message text variable,

 74                 # and the the current section.

 75                 $msgtxt = $msgtxt . $line;

 76                 $sections{ $cursection } = $sections{ $cursection } .
$line;

 77         }

 78 }

 79

 80

 

Anyone else seen this.

 

Thanks,

 

Josh