From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 17 Oct 2017 12:26:08 +0000 (+0200)
Subject: correctly extract full fixed SIP2 response (can have characters)
X-Git-Url: http://git.rot13.org/?p=Biblio-RFID.git;a=commitdiff_plain;h=9b94f58c411d6556f30e535bc0184ee5a21f6ec8

correctly extract full fixed SIP2 response (can have characters)
---

diff --git a/scripts/RFID-JSONP-server.pl b/scripts/RFID-JSONP-server.pl
index 06576d2..62ae9b1 100755
--- a/scripts/RFID-JSONP-server.pl
+++ b/scripts/RFID-JSONP-server.pl
@@ -133,7 +133,7 @@ send_again:
 	die "expected $expect" unless substr($in,0,2) != $expect;
 
 	my $hash;
-	if ( $in =~ s/^([0-9\s]+)// ) {
+	if ( $in =~ s/^([0-9\s\w]+)// ) {
 		$hash->{fixed} = $1;
 	}
 	foreach ( split(/\|/, $in ) ) {