{_ foreach $lang (@languages) { $Q::lang = $lang; $Q::hidden_class = ( $lang->{default} eq 1 ) ? '' : 'hidden'; $OUT .= Text::Template->fill_this_in( <<'EOM', PACKAGE => Q );
{$lang->{label}}
EOM } _}
{_ *Q::include_code = \&generate::get_pre_code; foreach $code (@codes) { $Q::code = $code; $OUT .= Text::Template->fill_this_in( <<'EOM', PACKAGE => Q );
{$code->{label}}
EOM foreach $lang (@languages) { $Q::lang = $lang; $Q::code_file = 'src/codes/' . $lang->{slug} . '/' . $code->{slug} . '.' . $lang->{ext}; $Q::hidden_class = ( $lang->{default} eq 1 ) ? '' : 'hidden'; $OUT .= Text::Template->fill_this_in( <<'EOM', PACKAGE => Q );
{include_code($code_file)}
EOM } $OUT .= <<'EOM'; # end .row
EOM } _}