#!/usr/bin/env perl
use Mojolicious::Lite;
use Data::Dumper;

post '/' => sub {
  my $self = shift;
  my $upload = $self->param('model');
  my $size = $upload->size;
  my $name = $upload->filename;
  warn $size;
  warn $name;
  $self->render(text => 'OK');
};

app->start;