Hi!
I'm having problem dereferencing:
---
%err = (
"usage" => sub { die "\nUsage: $0 <zone> <master|slave>\n" },
"zone" => sub { die "Zone allready exists!\n" }
);
$zone = lc $ARGV[0] || $err{'usage'};
print "$zone\n";
---
bash-2.05a$ perl dnsaddzone.pl
CODE(0x804eed0)
--
..................................
Damir Horvat
System administrator
VOLJATEL telekomunikacije d.d.
Smartinska 106
SI-1000 Ljubljana
Slovenia
..
Tel. +386.(0)1.5875 832
Fax. +386.(0)1.5875 899
www.voljatel.si
E-mail: [EMAIL PROTECTED]
..................................
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
