mirror of
https://github.com/cuberite/TCLAP.git
synced 2025-08-03 17:56:17 -04:00
12 lines
281 B
Perl
Executable File
12 lines
281 B
Perl
Executable File
#!/usr/bin/perl
|
|
#
|
|
# Simple perl script to generate the expected output of test scripts.
|
|
# This should never really be run.
|
|
# If you do run it, make sure the output conforms to what you expect.
|
|
#
|
|
|
|
for ( $i = 1; $i <= $ARGV[0]; $i++ )
|
|
{
|
|
system "test$i.sh; mv tmp.out test$i.out";
|
|
}
|