diff options
author | Joachim Tingvold <joachim@tingvold.com> | 2015-03-31 05:15:04 +0200 |
---|---|---|
committer | Joachim Tingvold <joachim@tingvold.com> | 2015-03-31 05:15:04 +0200 |
commit | 06e7a9661fff929fb5f230d34bac94aaa85af6bf (patch) | |
tree | e4a340d7f29fac4bb1dd4e7c1b9abad05f83f5a0 | |
parent | a134d1192ddbb4c37ad23155fab7552f7169cafe (diff) |
Sigh.
-rwxr-xr-x | tools/generate-rowdns.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/generate-rowdns.pl b/tools/generate-rowdns.pl index bee3387..abc8780 100755 --- a/tools/generate-rowdns.pl +++ b/tools/generate-rowdns.pl @@ -30,8 +30,8 @@ while (<STDIN>){ (my $v4gw = NetAddr::IP->new($client_v4)->first()) =~ s/\/[0-9]{1,2}//; (my $v6gw = NetAddr::IP->new($client_v6)->first()) =~ s/\/[0-9]{1,2}//; - (my $v4mgmt = $sw_v4) = s/\/[0-9]{1,2}//; - (my $v6mgmt = $sw_v6) = s/\/[0-9]{1,2}//; + (my $v4mgmt = $sw_v4) =~ s/\/[0-9]{1,2}//; + (my $v6mgmt = $sw_v6) =~ s/\/[0-9]{1,2}//; my $fqdn = $swname . "." . $nms::config::tgname . ".gathering.org."; my $sw_fqdn = "sw." . $fqdn; |