strip traling spaces

diff --git a/lib/H1/ZTEMSAN.pm b/lib/H1/ZTEMSAN.pm
index 0a45155..93a2e3f 100755 (executable)
--- a/lib/H1/ZTEMSAN.pm
+++ b/lib/H1/ZTEMSAN.pm
@@ -55,7 +55,7 @@ sub command {
        my $last_line;
        foreach my $line ( split(/[\n\r]+/, $out) ) {
                warn "# $line\n";
-               if ( $line =~ m/^(\S+.*?)\s+:\s+(\S+.*)$/ ) {
+               if ( $line =~ m/^(\S+.*?)\s+:\s+(\S+.*?)\s*$/ ) {
                        my ($n,$v) = ($1,$2);
                        $n =~ s/\(.+\)//;
                        $hash->{ $section . $n } = $v;