avoid weak perl usage in tests | |
https://bugs.gentoo.org/421609 | |
--- a/test.sh | |
+++ b/test.sh | |
@@ -1466,7 +1466,7 @@ | |
mkdir -p $dir | |
i=0 | |
while [ $i -lt 10 ]; do | |
- perl -e 'print "A" x 4017' >$dir/result$i-4017.o | |
+ printf '%4017s' '' | tr ' ' 'A' >$dir/result$i-4017.o | |
touch $dir/result$i-4017.stderr | |
touch $dir/result$i-4017.d | |
if [ $i -gt 5 ]; then |