Re: Perl Hash Script

[muba]

in reply to Perl Hash Script

One thing I can spot right away regards these lines.

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

Your code boils down to

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

I doubt that is what you really want.

Did you mean this instead?

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

[prithviraj]

I am not getting the exact output for your code Sir.

[muba]

I never claimed you it would. I was merely questioning whether your script might suffer from a logical error, and explaining why I think it does. Does it?

Edit: s/you/it/

[prithviraj]

Yes. You are right.