1
1

Fix the danged ziatest - thx to Jeff, the mighty perl guru!

This commit was SVN r21116.
Этот коммит содержится в:
Ralph Castain 2009-04-29 17:58:35 +00:00
родитель 1c7dd5a4aa
Коммит ce206df568

Просмотреть файл

@ -1,5 +1,6 @@
#!/usr/bin/perl
use Time::HiRes qw( gettimeofday );
($sec, $microsec) = gettimeofday;
$cmd = "mpirun -npernode " . @ARGV[0] . " ./ziatest " . " $sec " . $microsec;
push(@INC, $ENV{HOME}."/my-perl-mods");
require Time::HiRes;
($s, $usec) = Time::HiRes::gettimeofday();
$cmd = "mpirun -npernode " . @ARGV[0] . " ./ziatest " . " $s " . $usec;
system($cmd);