diff options
| author | Pedro Ribeiro Mendes Júnior <pedrormjunior@gmail.com> | 2018-10-06 15:53:24 -0300 |
|---|---|---|
| committer | Pedro Ribeiro Mendes Júnior <pedrormjunior@gmail.com> | 2018-10-06 15:53:24 -0300 |
| commit | 11620bd477c530cab1ccc8814f6a27ecaf9aa540 (patch) | |
| tree | 0c57e43fef51109447e68f9c13c1852a662b825c | |
| parent | 47969cdee3490d3315013058534f1d1f065a312c (diff) | |
| download | sbotools-11620bd477c530cab1ccc8814f6a27ecaf9aa540.tar.xz | |
escape left brace after perl update (solving issue #75)
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib/Build.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/SBO-Lib/lib/SBO/Lib/Build.pm b/SBO-Lib/lib/SBO/Lib/Build.pm index 767c523..f6911a9 100644 --- a/SBO-Lib/lib/SBO/Lib/Build.pm +++ b/SBO-Lib/lib/SBO/Lib/Build.pm @@ -241,7 +241,7 @@ sub get_dc_regex { # convert any instances of command substitution to [^-]+ $line =~ s/\$\([^)]+\)/[^-]+/g; # convert any bash variables to [^-]+ - $line =~ s/\$({|)[A-Za-z0-9_]+(}|)/[^-]+/g; + $line =~ s/\$(\{|)[A-Za-z0-9_]+(}|)/[^-]+/g; # get rid of anything excess at the end $line =~ s/\s+.*$//; # fix .?z* at the end |