Select Code to Download

#!/usr/bin/perl -w
use strict;
...
$pi = sum($c->suma_areas(args => \@args)->Results);
my $elapsed = tv_interval ($t0);
print "Pi = $pi. N = $N Time = $elapsed\n";

  ~/grid-machine$ export MACHINES=local
  ~/grid-machine$ perl examples/pi.pl
  Pi = 3.14159265358969. N = 10000000 Time = 5.387676

~/grid-machine$ export MACHINES='local imac'  
~/grid-machine$ echo $MACHINES
  local imac
  ~/grid-machine$ perl examples/pi.pl
  Pi = 3.14159265358969. N = 10000000 Time = 2.977237