diff options
author | 2008-01-02 04:24:40 +0000 | |
---|---|---|
committer | 2008-01-02 04:24:40 +0000 | |
commit | f72beed61d7c018e69ba167bb41204d142a466d4 (patch) | |
tree | 63689aa8d44aab46fee5920dd666ccbf2d11c0dc | |
parent | updating this. minor fixes. (diff) | |
download | scire-f72beed61d7c018e69ba167bb41204d142a466d4.tar.gz scire-f72beed61d7c018e69ba167bb41204d142a466d4.tar.bz2 scire-f72beed61d7c018e69ba167bb41204d142a466d4.zip |
fix parse_response() regex to ignore trailing whitespace
svn path=/branches/new-fu/; revision=315
-rwxr-xr-x | client/scireclient.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/scireclient.pl b/client/scireclient.pl index 15f323e..25e6c9b 100755 --- a/client/scireclient.pl +++ b/client/scireclient.pl @@ -101,7 +101,7 @@ sub send_command { sub parse_response { my $response = shift; - $response =~ /^(OK|ERROR)(?: (.+))?$/; + $response =~ /^(OK|ERROR)(?: (.+?))?\s*$/; my ($status, $message) = ($1, $2); return ($status, $message); } |