According to 'perldoc Date::Manip', the last (and optional) arg to DateCalc ($mode) is no longer an interger:

$mode is either "exact" or "approx" and defaults to "exact" if it is not included.

So, to fix these errors:

Use of uninitialized value $str in substitution (s///) at /usr/bin/mythtv-status line 392. Use of uninitialized value $str in substitution (s///) at /usr/bin/mythtv-status line 393. Use of uninitialized value $str in substitution (s///) at /usr/bin/mythtv-status line 394. Use of uninitialized value $seconds in numeric le (<=) at /usr/bin/mythtv-status line 396. Use of uninitialized value $str in concatenation (.) or string at /usr/bin/mythtv-status line 398.

You can remove the last arg from this line:

my $delta   = DateCalc('now', $next_time, undef, 1);

I'm not sure about the exact line number, as I've hacked up a bit of my mythtv-status. It's the only ocurrance of "DateCalc" in the entire script.

So the result that works for me is:

my $delta   = DateCalc('now', $next_time, undef);

~Keith



--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]

Reply via email to