mojolicious_virtual_host.pl

package Application;

use strict;
use warnings;

use base 'Mojolicious';

sub startup {
	my $self = shift;
	
	$self->plugin('header_condition');
	
	my $r = $self->routes;
	
	# own layout for each domain
	# main domain
	my $m = $r->route->to(layout => 'default')->over( headers => {Host => 'example.com'} );
	$m->route('/')->to('main#welcome');
	
	# blog domain
	my $b = $r->route->to(layout => 'blog')->over( headers => {Host => 'blog.example.com'} );
	$b->route('/')->to('blog#welcome');
	
	# admin domain
	my $b = $r->route->to(layout => 'admin')->over( headers => {Host => 'admin.example.com'} );
	$b->route('/')->to('admin#welcome');
}

1;