Opened by Gast at 2007-07-13 10:58
Hallo Gemeinde
Hab folgendes kleines Programm geschrieben:
Beim Ausführen gibt er mir immer diesen Fehler aus:
Warum? Was mach ich falsch? Wie kann ich den Fehler beheben?
Danke
Stephan
Hab folgendes kleines Programm geschrieben:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#!/usr/bin/perl
use Net::IP;
my $ip = new Net::IP('192.168.0/24') or die(Net::IP::Error());
#Usage() if (@ARGV != 0 and $ARGV[0] eq "-h");
sub get_hosts{
return new Net::IP($_[0]->last_ip())->intip() - $_[0]->intip();
}
print get_hosts($ip)."\n";
# Berechnung des ld()
print log(get_hosts($ip))/log(2);
# Lange schreibweise, vllt stimmt ja an der Funktion was nicht
print log((new Net::IP($ip->last_ip())->intip()) - ($ip->intip()));
Beim Ausführen gibt er mir immer diesen Fehler aus:
Code: (dl
)
Can't use an undefined value as an ARRAY reference at /usr/share/perl/5.8/Math/BigInt/Calc.pm line 1376.
Warum? Was mach ich falsch? Wie kann ich den Fehler beheben?
Danke
Stephan