#!/usr/bin/perl -w
   use strict;
   use jQuery::File::Upload;
   #simplest implementation
   my $j_fu = jQuery::File::Upload->new;
   $j_fu->upload_dir('/var/www/tempfiles');
   $j_fu->handle_request;
   $j_fu->print_response;