就像标题所说,Image :: ExifTool ImageInfo()不理解我的论点。为什么呢?
if ( $form->submitted_and_valid ) {
my $photo = $c->model('DB::Photos')->create(
{
name => $form->param('photo_name'),
path => $c->req->upload('photo')->fh,
caption => $form->param('caption'),
uploaded => DateTime->now,
mime => $mime->mimeTypeOf( $c->req->upload('photo')->basename ),
}
);
$c->stash->{status_msg} = "Successfully uploaded!";
$c->stash->{photo} = $photo;
$c->detach;
...再往下,我从催化剂藏匿处获取$ photo对象
my $data = $photo->path->open('r') or die;
my $exif = new Image::ExifTool;
my $info = $exif->ImageInfo($data) # <- this should be a ref to an open image file
这里的问题在哪里?这是一个催化剂应用程序,我试图得到文件的exif_orientation,所以我可以旋转它,如果需要在网页上适当显示它。但是,我不能为我的生活获取图像文件中的exif信息。
这是文件的路径。是的,这个文件存在!我可以使用此路径在网页上显示它。
/usr/local/docs/www.test.com/public/myapp/root/static/photos/52/52A1F1BC-0281-11E7-A32D-B12F1463937A
我还使用外部工具检查了我正在使用的图像确实包含exif信息。