note
muba
<p>One thing I can spot right away regards these lines.
<c>
foreach my $empnum(sort keys %empwork)
{
my $periods=0;
$periods++;
my $hours = 0;
$hours += $empwork{$empnum};
</c>
</p>
<p>Your code boils down to
<c>
foreach my $empnum(sort keys %empwork)
{
my $periods = 1;
my $hours = $empwork{$empnum}
</c>
I doubt that is what you really want.</p>
<p>Did you mean this instead?
<c>
my $periods=0;
my $hours = 0;
foreach my $empnum(sort keys %empwork)
{
$periods++;
$hours += $empwork{$empnum};
</c>
</p>
1012260
1012260