diff --git a/src/config/hasblas.pl b/src/config/hasblas.pl index 498e2734e0..a3f5e2b713 100644 --- a/src/config/hasblas.pl +++ b/src/config/hasblas.pl @@ -43,7 +43,7 @@ while () @newtokens = split(' '); $num_tokens = @newtokens ; if($debug){print "tokens: @newtokens $#newtokens $num_tokens \n";} - push(tokens,@newtokens); + push(@tokens,@newtokens); } } close (DATA); @@ -75,7 +75,7 @@ foreach $file (@ARGV){ } } } - if ($found) {push(found_files,$file);} + if ($found) {push(@found_files,$file);} close(FIXEDFILE); } $num_found_files = @found_files; diff --git a/src/config/hasdblas.pl b/src/config/hasdblas.pl index e36c518c31..37b9415f9a 100644 --- a/src/config/hasdblas.pl +++ b/src/config/hasdblas.pl @@ -43,7 +43,7 @@ while () @newtokens = split(' '); $num_tokens = @newtokens ; if($debug){print "tokens: @newtokens $#newtokens $num_tokens \n";} - push(tokens,$newtokens[0]); + push(@tokens,$newtokens[0]); } } close (DATA); @@ -75,7 +75,7 @@ foreach $file (@ARGV){ } } } - if ($found) {push(found_files,$file);} + if ($found) {push(@found_files,$file);} close(FIXEDFILE); } $num_found_files = @found_files;