Fix perl deprecated warning with 5.14

Code of the form:
  for $i qw(a b c)
causes the warning:
  Use of qw(...) as parentheses is deprecated

1 files changed, 1 insertions, 1 deletions

diff --git a/scripts/system/vyatta_update_ntp.pl b/scripts/system/vyatta_update_ntp.pl
index 3cb19804..4619b3bc 100755
--- a/scripts/system/vyatta_update_ntp.pl
+++ b/scripts/system/vyatta_update_ntp.pl
@@ -32,7 +32,7 @@ $cfg->setLevel("system ntp");
 
 foreach my $server ($cfg->listNodes("server")) {
     print "server $server iburst";
-    for my $property qw(dynamic noselect preempt prefer) {
+    for my $property (qw(dynamic noselect preempt prefer)) {
 	print " $property" if ($cfg->exists("$server $property"));
     }
     print "\n";