Perl - 使用Perl将MSSQL图像字符串转换为JPEG / PNG

Question

无需使用Image :: Magick;，有没有办法将MSSQL Image字符串作为JPEG / PNG文件输出到本地文件系统。

C＃中的以下内容非常有效，很难找到Perl中的等效内容。

     string base64string = "/9j/4AAQSkZJRgABAQAAAQABAAD/4QB...";  # This string shortened otherwise it would not fit
       byte[] blob = Convert.FromBase64String(base64string);
       File.WriteAllBytes(@"C:\image.jpg", blob);

感谢。

Answer 1

您的字符串看起来只需要decode_base64。然后将其写入使用>打开的文件并在处理程序上运行binmode。因此，新行字符转换不会破坏您的数据。