[catagits/Catalyst-Runtime.git] / t / lib / TestApp / Controller / Action / TestMultipath.pm

package TestApp::Controller::Action::TestMultipath;

use strict;
use base 'TestApp::Controller::Action';

__PACKAGE__->config(
  namespace => 'action/multipath'
);

sub multipath : Local : Global : Path('/multipath1') : Path('multipath2') {
    my ( $self, $c ) = @_;
    for my $line ( split "\n", <<'EOF' ) {
foo
bar
baz
EOF
        $c->res->write("$line\n");
    }
}

1;
Commit	Line	Data
2dbdc32c	1	package TestApp::Controller::Action::TestMultipath;
749472d6	2
	3	use strict;
	4	use base 'TestApp::Controller::Action';
	5
2dbdc32c	6	__PACKAGE__->config(
	7	namespace => 'action/multipath'
	8	);
	9
749472d6	10	sub multipath : Local : Global : Path('/multipath1') : Path('multipath2') {
	11	my ( $self, $c ) = @_;
	12	for my $line ( split "\n", <<'EOF' ) {
	13	foo
	14	bar
	15	baz
	16	EOF
	17	$c->res->write("$line\n");
	18	}
	19	}
	20
	21	1;