diff options
author | Jacob Pipkin <j@dawnrazor.net> | 2012-06-01 16:07:48 -0500 |
---|---|---|
committer | Jacob Pipkin <j@dawnrazor.net> | 2012-06-01 16:07:48 -0500 |
commit | 707016b269a36eb68b6374869908920b196394c6 (patch) | |
tree | c29f654a1a5a6ec835728b4dbf2b25496ae23e98 | |
parent | b8c32607eb188fcba6e440d0cf1c1afb2953e2c3 (diff) | |
download | sbotools2-707016b269a36eb68b6374869908920b196394c6.tar.xz |
further enhancement to requirement parsing
-rwxr-xr-x | sboupgrade | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -107,10 +107,10 @@ sub grok_requirements { $string =~ s/,\s+/,/g; my @deps = split (/,/, $string); # if anything has a space, we didn't parse correctly, so remove it, also - # remove anything that's blank + # remove anything that's blank or has an equal sign in my @remove; for my $key (keys @deps) { - push (@remove, $key) if ($deps[$key] =~ /\s+/ || $deps[$key] =~ /^$/); + push (@remove, $key) if ($deps[$key] =~ /[\s=]/ || $deps[$key] =~ /^$/); } if (exists $remove[0]) { splice (@deps, $_, 1) for @remove; |