While there are a variety of responses that could be made, I'll stick with the immediately obvious one: you didn't use strict. If you had, you would have caught an obvious error of forgetting the sigil ($):

    # wrong 
    #if ($ns1dns|$ns2dns|ns3dns|ns4dns) {

    if ($ns1dns || $ns2dns || $ns3dns || $ns4dns) {
[download]

Cheers,
Ovid

Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.