view release on metacpan or  search on metacpan

bin/ct2pod.pl  view on Meta::CPAN

[% END %]

=head1 SYNOPSIS

[% IF pod.synopsis %][% pod.synopsis %][% ELSE %]
  use [% class %];

  my $object = [% class %]->new
[% IF required %]
      (
[% FOR item = required %]
        [% item.name %] => [% item.example %],
[% END %]
      );
[% END %][%# required %]
[% END %]

[% FOR type = fields.keys.sort %]
[% IF type.match("i?set") %]
[% FOR fields = fields.$type.keys.sort %]
  $obj->