通过Perl将blob字符串写入文件

Question

我在perl中有一个blob srting（jpg图像）。如何使用perl将其写入服务器上的jpg文件到磁盘？

我在CPAN上找到了File::BLOB模块，但目前尚不清楚它是否可以将文件转换为blob，或者它也可以将blob转换为文件。

要进行文件转换的File :: BLOB功能，还是有其他工作模块或进程来执行此操作？

Answer 1

只需打开文件句柄，将其设置为binary mode并写出您的数据。

open my $fh, '>', 'foo.jpg' or die $!;
binmode $fh;
print $fh $blob;
close $fh;

另请查看perlopentut。