package Bookmarks; use strict; use Catalyst qw/-Debug/; our $VERSION = '0.01'; Bookmarks->config( name => 'Bookmarks' ); Bookmarks->setup; =head1 NAME Bookmarks - Catalyst based application =head1 SYNOPSIS script/bookmarks_server.pl =head1 DESCRIPTION Catalyst based application. =head1 METHODS =over 4 =item default =cut sub default : Private { my ( $self, $c ) = @_; $c->res->output('Congratulations, Bookmarks is on Catalyst!'); } =back =head1 AUTHOR Catalyst developer =head1 LICENSE This library is free software . You can redistribute it and/or modify it under the same terms as perl itself. =cut 1;