my $periods=0;
my $hours = 0;
foreach my $empnum(sort keys %empwork)
{
 $periods++;
 $hours += $empwork{$empnum};