Catalyst::ActionRole::MatchHost - Match action against domain host name

Match host name

    package MyApp::Controller::Root

    use Moose;
    BEGIN { extends 'Catalyst::Controller::ActionRole' };

    sub index :Path('/') :Does('MatchHost') :Host(^mainhost$)
    {
        my ( $self, $c ) = @_;
        ...
    }

    ...

    package MyApp::Controller::NonRoot

    use Moose;
    BEGIN { extends 'Catalyst::Controller::ActionRole' };

    sub index :Path('/') :Does('MatchHost') :HostNot(^mainhost$)
    {
        my ( $self, $c ) = @_;
        ...
    }

Anatoliy Lapitskiy, <nuclon at cpan.org>

Please report any bugs or feature requests to bug-catalyst-action-domain at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Catalyst-ActionRole-MatchHost. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

You can find documentation for this module with the perldoc command.

    perldoc Catalyst::ActionRole::MatchHost

You can also look for information at:

* RT: CPAN's request tracker

http://rt.cpan.org/NoAuth/Bugs.html?Dist=Catalyst-ActionRole-MatchHost

* AnnoCPAN: Annotated CPAN documentation

http://annocpan.org/dist/Catalyst-ActionRole-MatchHost

* CPAN Ratings

http://cpanratings.perl.org/d/Catalyst-ActionRole-MatchHost

* Search CPAN

http://search.cpan.org/dist/Catalyst-ActionRole-MatchHost/

Copyright 2009 Anatoliy Lapitskiy.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.