Help for this page

Select Code to Download

Select or download this

use Modern::Perl;

use Number::Range;
...
    }
    say '------------------------------';
}

Select or download this

--Checking ./secondary_1.txt--
Alex: 3 44 absent 0 0 absent 0 0 
Alex: 124 175 absent 0 0 present 134 155 
...
Drew: 9 43 present 19 54 absent 0 0 
James: 6 45 present 29 45 
------------------------------