Select Code to Download

struct Appt => {
   startTime => '$',
...
   appts => '@',
   numAppts => '$',
};

my @days;
my $dayCount = 0;

sub hdl_start
{
...
   }
   $currEle = $elt;
}

# Get the number of appointments
my $numAp = $days[$dayCount]->numAppts;
...

# Insert my new Appt struct into the appts array
$days[$dayCount]->appts[$numAp] = $temp;