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

net*_*djw 0 perl module blob

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

我在 CPAN 上找到了File::BLOB模块,但不清楚它只能将文件转换为 blob,或者也可以将 blob 转换为文件。

File::BLOB 功能将 blob 转换为文件,或者是否有任何其他工作模块或进程可以执行此操作?

sim*_*que 5

只需打开一个文件句柄,将其设置为二进制模式并写出您的数据。

open my $fh, '>', 'foo.jpg' or die $!;
binmode $fh;
print $fh $blob;
close $fh;
Run Code Online (Sandbox Code Playgroud)

也看看perlpentut