CPAN::Groonga

package jQuery::File::Upload::Imager;

use 5.008008;
use strict;
use warnings;

use CGI;
use JSON::XS;
use Net::SSH2;
use Net::SSH2::SFTP;
use Imager;
use Cwd 'abs_path';
use Digest::MD5 qw(md5_hex);

estion
  		if ($self->ctx->req->headers->header('Accept') =~ qr(application/json) ) {
	  		$content_type = 'application/json';
  		}

		$self->ctx->stash->{current_view} = '';
		$self->ctx->res->conte

');
	}

	#they should provide image=y or image=n if image
	my $json = JSON::XS->new->ascii->pretty->allow_nonref;
	$self->{output} = $json->encode({files => \@arr});
}

sub _no_ext {
	my $self = shift