Perl-Html写入PDF
我正在尝试使用包从HTML创建PDF。如果我使用load_文件（html文件），它工作得很好。如果我想写文本而不是html文件，我该如何更改。例如：Perl-Html写入PDF,html,perl,pdf,Html,Perl,Pdf,我正在尝试使用包从HTML创建PDF。如果我使用load_文件（html文件），它工作得很好。如果我想写文本而不是html文件，我该如何更改。例如： use PDF::FromHTML; my $pdf = PDF::FromHTML->new( encoding => 'utf-8' ); $pdf->load_file('source.html'); $pdf->convert; $pdf->write_file('target.pdf'); 它从sourc
use PDF::FromHTML;
my $pdf = PDF::FromHTML->new( encoding => 'utf-8' );
$pdf->load_file('source.html');
$pdf->convert;
$pdf->write_file('target.pdf');
use PDF::FromHTML;
my $pdf = PDF::FromHTML->new( encoding => 'utf-8' );
$pdf->load_file('<h1>Hello World</h1>');
$pdf->convert;
$pdf->write_file('target.pdf');
使用PDF:：FromHTML；
我的$pdf=pdf:：FromHTML->new（编码=>'utf-8'）；
$pdf->load_文件（“Hello World”）；
$pdf->convert；
$pdf->write_文件（'target.pdf'）；
use strict;
use warnings;
use autodie;
use PDF::FromHTML;
my $data = do {local $/; <DATA>};
my $pdf = PDF::FromHTML->new( encoding => 'utf-8' );
$pdf->load_file(\$data);
$pdf->convert;
$pdf->write_file('target.pdf');
# Start Fresh each time
BEGIN { unlink 'target.pdf'; }
__DATA__
<html>
<body>
<h1>Hello world</h1>
<p>From data block.</p>
</body>
</html>
使用严格；
使用警告；
使用自动模具；
使用PDF:：FromHTML；
my$data=do{local$/；}；
我的$pdf=pdf:：FromHTML->new（编码=>'utf-8'）；
$pdf->加载文件（\$data）；
$pdf->convert；
$pdf->write_文件（'target.pdf'）；
#每次都要重新开始
开始{unlink'target.pdf'；}
__资料__
你好，世界
来自数据块
PDF:：FromHTMLPDF:：FromHTML:：Twig