Select Code to Download

$mid=($low+$high)/2;

use strict;
use warnings;

use strict;
use warnings;
...
say $list[2.5];
say $list[2.01];
say $list[2.99]; # all these print '2'