Group,
  
  I am trying to write a load testing script.
  
  The script goes like this:
  ++++++++++++++++++++++++++++++++++
  my $j = 0;
  while ($j < 300)
  {
  $dbh[$j] = DBI->connect ( "dbi:Oracle:$instance[$i]",
              "$username[$i]",
              "$passwd[$i]",
              {
                  PrintError => 1,
                  RaiseError => 1,
                  AutoCommit => 1
              }
              ) || die  "Database Connection not made $DBI::errstr" ;# Create a 
Database
  #do some random, endless select statement here.
  $j++;
  }
  ++++++++++++++++++++++++++++++++++++++++++
  
  What I want is 300 session do the select statement simultaneously.  But this 
script will do one session after another.
  
  Do I REALLY have to start 300 perl script in order to this testing, or  there 
is some way in perl that one script can start up 300 session and  do their 
invidual select simultaneously?
  
  Thanks for your help.
  
  Joe

                
---------------------------------
 All-new Yahoo! Mail - Fire up a more powerful email and get things done faster.

Reply via email to