$min = int(rand(10)) + 15;
    $max = int(rand(25));
    $dayofdeath = int(rand($max)) + $min;

##</code><code>##

        print "DAY: $days\n";
        print "================\n";
        print "LICE: $n\n";
        print "LIVE LICE: $living\n";
        print "DEAD LICE: $deathtoll\n";
        print "FEMALES: $females\n";
        print "MALES: $males\n";
        print "EGG LAYERS (FEMALE ADULTS): $egglayers\n";
        print "NYMPHS (LITTLE/YOUNG): $toddlers\n";
        print "EGGS: $eggsacks\n";
        print "EGGS LAID TODAY: $eggslaidtoday\n";
        print "================\n";

##</code><code>##

        print <<END_OF_REPORT;
DAY: $days
================
LICE: $n
LIVE LICE: $living
DEAD LICE: $deathtoll
FEMALES: $females
MALES: $males
EGG LAYERS (FEMALE ADULTS): $egglayers
NYMPHS (LITTLE/YOUNG): $toddlers
EGGS: $eggsacks
EGGS LAID TODAY: $eggslaidtoday
================
END_OF_REPORT