$max = 0;
for $i (1 ..500) {#your loop
   $mutual = some_calculation;
   if ($mutual > $max) {$max = $mutual;)
}