use v6;
use Bailador;

=begin pod
注意的是， 当/:one设置时
虽然你有/admin或/about, 但这个/:one不会跟现有的匹配
只跟没有的匹配：
也就是说， 当你输入/admin或/about时， get ‘/:one‘对应的匿名子例程不会运行
当你访问的不是/admin或/about时， get ‘/:one‘发条会执行
还有一点要注意的就是
当你设置/admin时， 所有/admin或/admin*都会返回get ‘/admin‘子例程
如果你要设置/admin/login子例程时， 要明确指定才行, 并且， 子目录要放在父目录前面
像下面的/admin/login要放在/admin前， 因为代码从上向下执行
如果顺序相返， /admin/login会不能访问到， 会被上层的/admin覆盖掉
=end pod

get ‘/admin/login‘ => sub {
  ‘this is login under /admin‘
}

get ‘/admin‘ => sub {
  ‘This is admin page‘;
}

get ‘/about‘ => sub {
  ‘This is about me page‘;
}

get ‘/:one‘ => sub ($root) {
  $root;
}
baile;