57 |
|
|
58 |
printf "Creating input data. Please wait" |
printf "Creating input data. Please wait" |
59 |
activity="create data" |
activity="create data" |
60 |
$PERL -e 'print "AB12\n" foreach 1...100000; |
$PERL -e 'for ($i=0; $i<100000; $i++) { print "AB12\n" }; |
61 |
print "AB04\n" foreach 1...100000;' > $TEMPDIR/large.dat |
for ($i=0; $i<100000; $i++) { print "AB04\n" };' > $TEMPDIR/large.dat |
62 |
if [ $? -ne 0 ] ; then no_result ; fi |
if [ $? -ne 0 ] ; then no_result ; fi |
63 |
printf ".\n"; |
printf ".\n"; |
64 |
|
|
79 |
if [ $? -ne 0 ] ; then fail ; fi |
if [ $? -ne 0 ] ; then fail ; fi |
80 |
|
|
81 |
activity="appending to data" |
activity="appending to data" |
82 |
# Put another 100,000 cases into large.dat |
# Put another 50,000 cases into large.dat |
83 |
$PERL -e 'print "AB04\nAB12\n" foreach 1...25000' >> $TEMPDIR/large.dat |
$PERL -e 'for ($i=0; $i<25000; $i++) { print "AB04\nAB12\n" };' >> $TEMPDIR/large.dat |
84 |
if [ $? -ne 0 ] ; then no_result ; fi |
if [ $? -ne 0 ] ; then no_result ; fi |
85 |
|
|
86 |
activity="run program" |
activity="run program" |