App-karr

 view release on metacpan or  search on metacpan

.claude/agents/pod-writer.md  view on Meta::CPAN


```perl
has name => ( is => 'ro', required => 1 );

=attr name

The user's name. Required.

=cut

has timeout => ( is => 'ro', default => 30 );

=attr timeout

Request timeout in seconds. Defaults to C<30>.

=cut
```

### 4. Methods - INLINE after `sub`

```perl
sub process {
    my ($self, $data) = @_;
    # implementation
}

=method process

    my $result = $obj->process($data);

Process the input data and return a result.

=cut
```

### 5. Functions (for exportable subs)

```perl
sub parse_config {
    my ($file) = @_;
    # implementation
}

=func parse_config

    my $config = parse_config($filename);

Parse a configuration file and return a hashref.

=cut
```

## Additional Commands

| Command | Use for | Example |
|---------|---------|---------|
| `=opt` | CLI options | `=opt --verbose` |
| `=env` | Environment variables | `=env API_KEY` |
| `=event` | Events | `=event user.created` |
| `=hook` | Hooks/callbacks | `=hook before_save` |
| `=resource` | API resources/features | `=resource servers` |
| `=example` | Usage examples | `=example Basic Usage` |
| `=seealso` | Related modules | `=seealso L<Other::Module>` |

## Complete Example

```perl
package WWW::Example::Client;
# ABSTRACT: Client for Example API

use Moo;
use namespace::clean;

=head1 SYNOPSIS

    use WWW::Example::Client;

    my $client = WWW::Example::Client->new(
        token => $ENV{EXAMPLE_TOKEN},
    );
    my $data = $client->fetch('/users');

=head1 DESCRIPTION

HTTP client for the Example API with automatic retry and caching.

=cut

has base_url => ( is => 'ro', default => 'https://api.example.com' );

=attr base_url

API base URL. Defaults to C<https://api.example.com>.

=cut

has token => ( is => 'ro', required => 1 );

=attr token

API authentication token. Required.

=cut

has timeout => ( is => 'ro', default => 30 );

=attr timeout

Request timeout in seconds. Defaults to C<30>.

=cut

sub fetch {
    my ($self, $path) = @_;
    # implementation
}

=method fetch

    my $data = $client->fetch($path);



( run in 0.512 second using v1.01-cache-2.11-cpan-cdf2f3d4e48 )