The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Catalyst::View::Atom::XML - XML serialization for Atom objects

SYNOPSIS

package My::App::View::XML;
use strict;
use base qw( Catalyst::View::Atom::XML );
1;

DESCRIPTION

Catalyst::View::Atom::XML provides automatic serialization of XML::Atom objects for a Catalyst application. Your application needs only set $c->stash->{xml_atom_object}, then forward to your view, to serialize an XML::Atom object.

For example:

sub foo {
    my($self, $c) = @_;
    my $entry = XML::Atom::Entry->new;
    $entry->title('Foo');
    $c->stash->{xml_atom_object} = $entry;
}

sub end : Private {
    my($self, $c) = @_;
    $c->forward('My::App::View::XML');
}