package Bookmarks::C::Main; use strict; use base 'Catalyst::Base'; =head1 NAME Bookmarks::C::Main - Catalyst component =head1 SYNOPSIS See L =head1 DESCRIPTION Catalyst component. =head1 METHODS =over 4 =item default =cut sub default : Private { my ( $self, $c ) = @_; $c->res->output('Congratulations, Bookmarks::C::Main is on Catalyst!'); } =back =head1 AUTHOR A clever guy =head1 LICENSE This library is free software . You can redistribute it and/or modify it under the same terms as perl itself. =cut 1;