Help for this page

Select Code to Download

Select or download this

C:\tmp\e>perl
use List::Util qw( min max );
...
6 is inside: 1
7 is inside: 1
8 is inside: