use strict;
use vars qw( $DEBUG ); #$conf );
+use Storable qw(thaw);
+use MIME::Base64;
use Data::Dumper;
use FS::Misc::DateTime qw( parse_datetime );
use FS::Record qw( qsearchs );
sub process_batch_import {
my $job = shift;
- my $param = shift;
+ #my $param = shift;
+ my $param = thaw(decode_base64(shift));
warn Dumper($param) if $DEBUG;
my $files = $param->{'uploaded_files'}