commit c011dd1309f98b779e9234e49a58e63b99c84c21
parent 0c7b5269e0dd8a43a4cd8a9bd23191b27d2d9933
Author: Andreas Guldstrand <andreas.guldstrand@gmail.com>
Date: Thu, 26 Nov 2015 14:11:31 +0100
This shouldn't be a regex. chomp() and eq properly.
Diffstat:
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm
@@ -710,7 +710,8 @@ sub get_src_dir {
my $found = 0;
seek $fh, 0, 0;
SECOND: while (my $line = <$fh>) {
- if ($line =~ /$ls/) {
+ chomp ($line);
+ if ($line eq $ls) {
$found++;
last SECOND;
}