foreach my $suffix (keys %sufdata)