Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
    $count++;
}
print "Searched value is : $guess, found in $count tries \n";

Select or download this

$ perl  number_guess.pl
383169808282 - Range is 0 - 383169808282
...
879144797174 - Range is 879144797174 - 879144797176
Searched value is : 879144797175, found in 50 tries
$