view release on metacpan or  search on metacpan

t/htdocs/index.asp  view on Meta::CPAN

  my @result = map {
    my $widget = $_;
    my $res = {
      $widget->name => {
        map { ($_ => $widget->get( $_ )) }
        $widget->attrs
      }
    };
    $res;
  } $linker->widgets;
%><%= JSON::XS->new->utf8->pretty->encode( \@result ) %>