1#!/usr/bin/perl 2# Root.pm 3# Copyright (c) 2006 Jonathan Rockway <jrockway@cpan.org> 4 5package TestApp::Controller::Root; 6use strict; 7use warnings; 8use base qw(Catalyst::Controller); 9 10__PACKAGE__->config->{namespace} = q{}; 11 12 13sub default : Private { 14 warn "default"; 15 return 1; 16} 17 181; 19