- my $iter = sub {
- my ($data, $div) = @_;
- $div->attr(id => $data);
- $div->find('h2')->replace_content(ucfirst $data);
- $div->find('tbody')->find('tr')->iter3($args{$data}, $titer);
- };
- push @{$args{$_->{level}} //= []}, $_ for @{$args{pb}};
- $tree->fid('beginner')->iter3([grep {$args{$_}} qw/beginner easy medium hard/], $iter);