diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-13 14:40:56 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-13 14:40:56 +0000 |
| commit | 602848d7fba65f080b8a5a3f46b881b48320e4f5 (patch) | |
| tree | 618368bc5473795b0616a0d46f21274744fe13ba /MDK/Common/String.pm | |
| parent | 3cfc42b677f1599e57e63ae189f5d39d1e5d8f5e (diff) | |
| download | perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar.gz perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar.bz2 perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.tar.xz perl-MDK-Common-602848d7fba65f080b8a5a3f46b881b48320e4f5.zip | |
add/remove spaces to make perl_checker happy
Diffstat (limited to 'MDK/Common/String.pm')
| -rw-r--r-- | MDK/Common/String.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/MDK/Common/String.pm b/MDK/Common/String.pm index 8ea1c3c..b5a588c 100644 --- a/MDK/Common/String.pm +++ b/MDK/Common/String.pm @@ -75,10 +75,10 @@ sub bestMatchSentence { foreach (@_) { my $count = 0; foreach my $e (@s) { - $count+= length ($e) if /^$e$/; - $count+= length ($e) if /^$e$/i; - $count+= length ($e) if /$e/; - $count+= length ($e) if /$e/i; + $count += length($e) if /^$e$/; + $count += length($e) if /^$e$/i; + $count += length($e) if /$e/; + $count += length($e) if /$e/i; } $best = $count, $bestSentence = $_ if $count > $best; } |