my $id = (m,^$path/(.*)/meta.yml$,)[0];
+{ id => $id, name => $meta->{name}, level => $meta->{level} } } <$path/*/meta.yml>;
for my $d(qw/beginner easy medium advanced hard/) {
my $id = (m,^$path/(.*)/meta.yml$,)[0];
+{ id => $id, name => $meta->{name}, level => $meta->{level} } } <$path/*/meta.yml>;
for my $d(qw/beginner easy medium advanced hard/) {