X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FPb.pm;h=a2cccff504516d7c90969a00977c2be54a584ec8;hb=9be91908e37325aae1af68d98f8aafce310c6950;hp=617112a539c99a73a3361e8a4e429914f7078754;hpb=3507313013238e4c5f9b5bb34ce0925e39f6f387;p=plack-app-gruntmaster.git diff --git a/lib/Gruntmaster/Page/Pb.pm b/lib/Gruntmaster/Page/Pb.pm index 617112a..a2cccff 100644 --- a/lib/Gruntmaster/Page/Pb.pm +++ b/lib/Gruntmaster/Page/Pb.pm @@ -18,8 +18,29 @@ use Gruntmaster::Page::Common qw/header footer/; my %templates = ( en => <<'HTML', +

Beginner

+ +

Easy

+ + +

Medium

+ + +

Advanced

+ + +

Hard

+ HTML ); @@ -37,8 +58,10 @@ sub generate{ my @problems = sort { $b->{name} cmp $a->{name} } map { my $meta = LoadFile $_; my $id = (m,^$path/(.*)/meta.yml$,)[0]; - +{ id => $id, name => $meta->{name} } } <$path/*/meta.yml>; - $htc->param(problems => \@problems); + +{ id => $id, name => $meta->{name}, level => $meta->{level} } } <$path/*/meta.yml>; + for my $d(qw/beginner easy medium advanced hard/) { + $htc->param($d => [grep {$_->{level} eq $d} @problems]); + } $htc->output }