diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2003-05-01 12:16:06 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2003-05-01 12:16:06 +0000 |
commit | fb18a39ace6db2ca0043060446be7f3daa60f3da (patch) | |
tree | 01e2d6b950a23c1dbb75f1f992c2e5459a51fa2d /modules/StringProcessor.pm | |
parent | 74eb40e1aef9eb3eab43969fe36e101b241b31fb (diff) | |
download | MPC-fb18a39ace6db2ca0043060446be7f3daa60f3da.tar.gz |
ChangeLogTag: Thu May 1 07:09:07 2003 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/StringProcessor.pm')
-rw-r--r-- | modules/StringProcessor.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/modules/StringProcessor.pm b/modules/StringProcessor.pm index 9bb05eb5..97a5ab96 100644 --- a/modules/StringProcessor.pm +++ b/modules/StringProcessor.pm @@ -79,7 +79,11 @@ sub create_array { elsif ($val =~ /^\'(.*)\'$/) { $val = $1; } - push(@array, $val); + + ## Only add the value to the array if the string isn't empty + if ($val ne '') { + push(@array, $val); + } for(; $i < $length; $i++) { if (substr($line, $i, 1) !~ /\s/) { $i--; |