NAME

PowerTools::Upload::File - Additional Perl tool for Apache::ASP data uploading

SYNOPSIS

use PowerTools::Upload::File;

my $up = PowerTools::Upload::File->new(			# Create new object
	path => 'E:/instale/test', 			# Path to directory where files will be stored (default: '/tmp')
	field => 'plik',				# Form field name (<input type"file" name="plik">, default: 'file')
	limit => $Server->Config("FileUploadMax"),	# File size limit (default 100000000)
	request => $Request,				# Request object
	clamav => 1,					# Scan with ClamAV when uploading (0 -> no / 1 -> yes, default: 0)
	overwrite => 0					# Overwrite file (0 -> no / 1 -> yes, default: 1)
	);

my $ret = $up->upload();				# Upload file
print $ret->{'filename'}."<br>";			# Returns filename
print $ret->{'filesize'}."<br>";			# Returns filesize
print $ret->{'filepath'}."<br>";			# Returns filepath
print $ret->{'filescan'}."<br>";			# Returns filescan
print $ret->{'filemime'}."<br>";			# Returns filemime
print $ret->{'copytime'}."<br>";			# Returns copytime
print $ret->{'status'};					# Returns upload status

AUTHOR

Piotr Ginalski, <office@gbshouse.com>

COPYRIGHT AND LICENSE

Copyright (C) 2007 by Piotr Ginalski

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.