Help for this page
if ($key eq $first .. $key eq $last) { ... { $in = 0; }
if ($key eq $first ... $key eq $last) { ... # starting with $first on a subsequent line } }