root@ns1 /root# ./script.pl

Please don't play with Perl while running as root. Please.
And on a nameserver no less.