Sig: Ejemplo de resultado Sup: Cronometrado de un programa Ant: Configuración Err: Si hallas una errata ...

Requeridos

Fichero input.pl

$ cat input.pl
sub generate_input {
  # size
  my ($test_file, $size, $t, $columns) = @_;
  my ($r, $k);

  open FILE, ">$test_file";
  for (1..$size) {
    $r = rand;
    print FILE "$r\t";
    print FILE "\n" if ($_ % $columns) == 0;
  }
  close(FILE);
}

1;

Sig: Ejemplo de resultado Sup: Cronometrado de un programa Ant: Configuración Err: Si hallas una errata ...