uploads => {
SourceFile_1 => bless({
"/tmp/5xSW7Swasp" => "filename",
"HTTP::Headers=HASH(0x40f1470)" => "tempname",
"aaa.jpg" => undef,
"charset=utf-8; Content-Transfer-Encoding: binary" => "headers",
size => 374205,
type => "image/jpeg",
}, "Catalyst::Request::Upload"),
},
####
#Get source file and save it to disk.
my $sourceFilePath = $c->req->param("FileName_" . $i);
my $fileName = $absGalleryPath . get_safe_file_name($sourceFilePath);
$c->log->warn('new filename is '.$fileName);
$c->log->warn('upload object is: '.$c->req->uploads->{"SourceFile_" . $i});
my $result;
$result = $c->req->uploads->{"SourceFile_" . $i}->copy_to($fileName)
or $c->error("no copy.\nfrom:".$c->req->uploads->{"SourceFile_" . $i}->tempname."\nto:$fileName \nsyserr: $!");
##
##
[info] *** Request 5 (0.079/s) [1115] [Fri Mar 26 14:04:22 2010] ***
[debug] File Uploads are:
.--------------+----------------------------+--------------------+-----------.
| Parameter | Filename | Type | Size |
+--------------+----------------------------+--------------------+-----------+
| SourceFile_1 | | image/jpeg | 374205 |
'--------------+----------------------------+--------------------+-----------'
[debug] Body Parameters are:
.-------------------------------------+--------------------------------------.
| Parameter | Value |
+-------------------------------------+--------------------------------------+
| Angle_1 | 0 |
| Description_1 | |
| FileCount | 1 |
| FileName_1 | aaa.jpg |
| Height_1 | 800 |
| HorizontalResolution_1 | 72 |
| PackageCount | -1 |
| PackageGuid | {7CEEC530-48D4-4499-A23B-79BA59731F- |
| | 98} |
| PackageIndex | 0 |
| SourceFileCreatedDateTimeLocal_1 | 2010:03:18 15:11:32 |
| SourceFileCreatedDateTime_1 | 2010:03:18 15:11:32 |
| SourceFileLastModifiedDateTimeLoca- | 2010:03:18 15:11:32 |
| l_1 | |
| SourceFileLastModifiedDateTime_1 | 2010:03:18 15:11:32 |
| SourceFileSize_1 | 374205 |
| VerticalResolution_1 | 72 |
| Width_1 | 800 |
'-------------------------------------+--------------------------------------'
[debug] "POST" request for "upload_photos" from "192.168.1.105"
[debug] Path is "upload_photos"
[warn] new filename is /Users/andye/PhotoApp/root/static/Gallery/aaa.jpg
[warn] upload object is: Catalyst::Request::Upload=HASH(0x40f14d0)
[error] no copy.
from:
to:/Users/andye/PhotoApp/root/static/Gallery/aaa.jpg
syserr: No such file or directory
[info] Request took 1.327533s (0.753/s)
.------------------------------------------------------------+-----------.
| Action | Time |
+------------------------------------------------------------+-----------+
| /upload_photos | 0.002403s |
| /end | 0.000428s |
'------------------------------------------------------------+-----------'