-# Put another 100,000 cases into large.dat
-i=0
-while [ $i -lt 50000 ] ; do
- echo AB04 >> $TEMPDIR/large.dat;
- echo AB12 >> $TEMPDIR/large.dat;
- i=$[$i + 1];
-done;
+# Put another 50,000 cases into large.dat
+$PERL -e 'for ($i=0; $i<25000; $i++) { print "AB04\nAB12\n" };' >> $TEMPDIR/large.dat