The Net::Interface changed its API in the newest version:
----------- cut ----------------
*** mvpboot.pl.orig 2009-06-14 17:07:20.000000000 -0600
--- mvpboot.pl 2009-06-14 17:07:20.000000000 -0600
*************** sub log_die {
*** 88,94 ****
my $if = Net::Interface->new($opts{i}) or die "$!\n";
my $ifaddr = scalar($if->address) or die "No IP address...
2009-06-25 20:50:13 UTC in MediaMVP Media Center