foreach $zone (@Zonelist) {

      @cmmd = split(/ /,$zone);
      print "Updating Flag @cmmd[0] from @cmmd[1]to @cmmd[2]";

   }