X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FCWMP%2FVendor.pm;h=fdbdc1ede7259b5664511731d330f470a00f22e1;hb=7b228b78e7b84172c1180c463c38f187d1ce496e;hp=e0cb1d3125594feee06730e12cb7c3a59c80bfeb;hpb=d4b4202a2f21c686eb6bb6c9efaf49cf3ed7c954;p=perl-cwmp.git

diff --git a/lib/CWMP/Vendor.pm b/lib/CWMP/Vendor.pm
index e0cb1d3..fdbdc1e 100644
--- a/lib/CWMP/Vendor.pm
+++ b/lib/CWMP/Vendor.pm
@@ -59,6 +59,7 @@ sub state2serial {
 	my $state = shift;
 
 	my $serial = $state->{DeviceID}->{SerialNumber} || die "no DeviceID.SerialNumber in ",dump($state);
+	chomp($serial);
 	my $ip =
 		$state->{Parameter}->{'.ExternalIPAddress'} ||
 		$state->{Parameter}->{