% use Mojo::JSON qw/decode_json/; my $categories = &subs::db_query('select * from settings where setting=? and value = ?', 'pos','category')->hashes; my $selected_formats = eval { return decode_json $appts->{$a}->{'setting'}->{'format'} } || []; %> Unknown <% foreach my $fs ( keys %{$gb::pos->{'media'}->{'formats'}} ) { %> selected<% } %>><%= &subs::format_name($fs) %> <% } %>