Snippets

Brian Medley File upload shimmy

Created by Brian Medley last modified
shimmy_file_upload.pl
Raw 
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
#!/opt/perl

use Mojolicious::Lite;

get '/' => 'form';

post '/upload' => sub {
  my $c = shift;

  # Check file size
  return $c->render(text => 'File is too big.', status => 200)
    if $c->req->is_limit_exceeded;

  # Process uploaded file
  my $example = $c->req->upload('kartik-input-700[]') ;
  my $size = $example->size;
  my $name = $example->filename;

  $c->render(json => {});
};

hook(after_build_tx => sub {
    my ($tx, $app) = @_;

    $tx->res->headers->header('Access-Control-Allow-Origin' => '*');
});


options '*' => sub {
  my $self = shift;

  $self->res->headers->header('Access-Control-Allow-Origin'=> '*');
  $self->res->headers->header('Access-Control-Allow-Credentials' => 'true');
  $self->res->headers->header('Access-Control-Allow-Methods' => 'GET, OPTIONS, POST, DELETE, PUT');
  $self->res->headers->header('Access-Control-Allow-Headers' => 'Content-Type, X-CSRF-Token');
  $self->res->headers->header('Access-Control-Max-Age' => '1728000');

  $self->respond_to(any => { data => '', status => 200 });
};

my $mode = shift(@ARGV);
push(@ARGV, "daemon", "-l", 'http://*:3000') if "display" eq $mode;
push(@ARGV, "daemon", "-l", 'http://*:3001') if "process" eq $mode;

app->start;

# https://github.com/kartik-v/bootstrap-fileinput#manual-install

__DATA__

@@ form.html.ep
<!DOCTYPE html>
<html>
  <head>
    <title>Upload</title>
    <link href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.4/css/bootstrap.min.css" rel="stylesheet">
    <link href="/fileinput.min.css" media="all" rel="stylesheet" type="text/css" />
    <script src="//ajax.googleapis.com/ajax/libs/jquery/2.0.0/jquery.min.js"></script>
    <script src="/fileinput.min.js" type="text/javascript"></script>
  </head>
  <body>
    <input id="input-700" name="kartik-input-700[]" type="file" multiple class="file-loading">
    <script>
    $("#input-700").fileinput({
        uploadUrl: "http://127.0.0.1:3001/upload", // server upload action
        uploadAsync: true
    });
    </script>
  </body>
</html>

Comments (0)

HTTPS SSH

You can clone a snippet to your computer for local editing. Learn more.