while (1) {

$heads=0;

foreach(1..50) {
$num[$_]=int(rand(2));
$heads+=$num[$_];
}

$adam_prediction=$heads+25;
$davide_prediction=50;

foreach(51..100) {
$num[$_]=int(rand(2));
$heads+=$num[$_];
}

$trials++;
if ($adam_prediction==$heads) {
$adam_success++;
}
if ($davide_prediction==$heads) {
$davide_success++;
}

if($adam_success>0) {
$davidadvantage=$davide_success/$adam_success;
print $davidadvantage."\n";
}
}