linuxdv-backend/lib/LDV.pm

package LDV;

use strict;
use warnings;
use utf8;

use Mojo::Base 'Mojolicious';

sub startup {
  my ($self) = @_;

  $self->plugin(I18N   => {default => 'ru'});
  my $config = $self->app->home->rel_file('conf/ldv.conf');
  $self->plugin(Config => {file => $config});

  $self->app->mode('production');
  $self->app->secret($self->app->config->{secret});

  my $r = $self->routes;

  # /user
  $r->get('/user/login')->to('user#login');
  $r->get('/user/create')->to('user#create');
  $r->get('/user/update')->to('user#update');

  $r->post('/user/create')->to('actions#create');

  # /zerobin
  my $zb = $r->route('/zerobin2') -> to(controller => 'zerobin');
    $zb->post('/') -> to(action => 'save');
    $zb->get ('/') -> to(action => 'create');
    $zb->route('/:time', time => qr/\d+/)
      ->via('GET') -> to(action => 'view');
  my $root = $self->app->config->{zerobin}->{root};
  mkdir $self->app->home->rel_dir($root);
}

1;