Benchmark: Mysql + Linux + Perl (DBI y DBD::mysql)
==================================================

Se itero 10 veces la insercion de 2000 registros iguales (con otra iteracion)
El tiempo total de los 20000 registros: 23.2 segs

La salida de cada iteracion muestra el tiempo en segundos que tardo en insertar
2000 registros en promedio: 2.3 segs (con minimo 2 y maximo 3 segundos)


Definicion de la tabla
----------------------

create table test (
	id int,
	nombre varchar(20),
	apellido varchar(20),
	nacimiento timestamp
	);


Ejecucion del Programa
----------------------

clown:/public# time perl test.pl
0 diff = 3
1 diff = 2
2 diff = 2
3 diff = 3
4 diff = 2
5 diff = 2
6 diff = 2
7 diff = 3
8 diff = 2
9 diff = 2

real    0m23.280s
user    0m6.770s
sys     0m1.170s


Codigo del Programa
-------------------
use DBI;

$dbh = DBI->connect(
	"DBI:mysql:database=test;host=localhost",
	"test", "<nolomuestrook?>",
	{'RaiseError' => 1}
	);

for ($j=0; $j<10; $j++) {
	$start = time;
	for ($i=0; $i<2000; $i++) {
		$dbh->do("INSERT INTO test VALUES (?, ?, ?, ?)", 
			undef, 
			$i, 
			'test_nombre',
			'test_apellido',
			'20030518154400'
		);
	}
	$stop = time;
	print "$j diff = ", $stop-$start, "\n";
}


Maquina donde se ejecuto la prueba
----------------------------------
model name      : Pentium MMX
cpu MHz         : 199.911
bogomips        : 398.95

             total       used       free
Mem:           124         97         27
Swap:          133          9        123

OS: Linux 2.4.18-586tsc i586