Revision: | 1.1.1.1 (vendor branch) |
Committed: | Tue Jan 10 13:06:55 2006 UTC (19 years, 3 months ago) by elmer |
Branch: | one, MAIN |
CVS Tags: | BOSS_4_3_10, BOSS_4_3_9, BOSS_4_3_8, BOSS_4_3_8-ui3_1, BOSS_4_3_7-ui3_1, BOSS_4_3_7, BOSS_4_3_6, BOSS_4_3_4a, BOSS_4_3_5, BOSS_4_3_4, BOSS_4_3_3, BOSS_4_3_2, BOSS_4_3_1b, BOSS_4_3_1a, BOSS_4_3_1, BOSS_4_3_0, BOSS_4_2_4, BOSS_4_2_3, BOSS_4_2_2, BOSS_4_2_1, BOSS_4_2_0, BOSS_4_1_10, BOSS_4_1_9, BOSS_4_1_9-test, BOSS_4_1_8, BOSS_4_1_7, BOSS_4_1_6, BOSS_4_1_5, BOSS_4_1_4, BOSS_4_1_3, BOSS_4_1_2, BOSS_4_1_1, BOSS_4_1_0, BOSS_4_0_11, BOSS_4_0_10, BOSS_4_0_9, BOSS_4_0_8, BOSS_4_0_7, BOSS_4_0_6, BOSS_4_0_5, BOSS_4_0_4, BOSS_4_0_3, BOSS_4_0_2, BOSS_4_0_1, BOSS_4_0_0, BOSS_v4_0_0-pre2, BOSS_v4_0_0-pre1, two, HEAD |
Branch point for: | BOSS_4_3-ui3_0, BOSS_4_3_1c |
Changes since 1.1: | +0 -0 lines |
Log Message: | test import |
# | User | Rev | Content |
---|---|---|---|
1 | elmer | 1.1 | #!/usr/bin/perl |
2 | $| = 1; | ||
3 | $i = 0; | ||
4 | $f = 1; | ||
5 | $len=@ARGV; | ||
6 | if($len > 0) { | ||
7 | $f = $ARGV[0]; | ||
8 | } | ||
9 | if ( $len > 1) { | ||
10 | $sched = "-scheduler $ARGV[1]"; | ||
11 | } | ||
12 | print $1; | ||
13 | while ( $i < $f ) { | ||
14 | system "boss s -jobtype test -executable test.pl -stdin in -stdout out.$i -stderr err.$i -infiles test.pl,in -outfiles out.$i,err.$i -args 3000 $sched"; | ||
15 | $i++; | ||
16 | } | ||
17 | |||
18 |