Added test scripts for server and client

[pve-dhcp-server.git] / DHCPServer.pm

diff --git a/DHCPServer.pm b/DHCPServer.pm
index 539093b34158728d8477cfdbe3d26f2eb591998a..ebf7144710f5a191a3aa97734f8e62c153310b5c 100644 (file)
--- a/DHCPServer.pm
+++ b/DHCPServer.pm
@@ -540,12 +540,7 @@ sub read_config {
                                } elsif ($subopt || $_ =~ /^\s*{\s*/) {
                                        if ($subopt) {
                                                if ($_ =~ /^\s*(allow|static)\s+(.+)\s*;/) {
-                                                       my (@vals, @tmp);
-                                                       @tmp = split(/,\s*/, $2);
-                                                       foreach (@tmp) {
-                                                               s/^\s+|\s+$//g;
-                                                               push @vals, $_;
-                                                       }
+                                                       my @vals = split(/\s*,\s*/, $2);
                                                        $config->{$1} = [@vals];
                                                        $self->logger("Key: $1 Value: $2");
                                                } else {