запись содержимого HTML в Perl-скрипте в файл в определенном каталоге

Question

У меня есть следующий код в скрипте perl / cgi:

$commonContent = <<HTML;
 <font color="#CC0000"><strong>$errStr</strong></font>
 <h2 class="first">Request ID: $recId<br />(Requested by: $userInfo->[1], $userInfo->[3], $userInfo->[5])</h2>
 <h3 style="margin-bottom:16px">Website: $website</h3>
 <p><strong>Request Type: $request</strong></p>
 <p>Request Description:<br />$description</p>
 <p>Priority/Required Turnaround Time: $priority</p>
 <p>Pre-deployment review: $review</p>
 <p><strong><i>Estimated completion date for this request: $completionDate</i></strong></p>
HTML

Я хочу записать содержимое HTML в файл в каталоге, чтобы сохранить его в виде записи.Кто-нибудь знает как это сделать?Я прочитал второе издание кулинарной книги perl и pro perl по этому вопросу, но все это мне безразлично.

Answer 1

my $myfile = '/path/to/myfile.html';
open(FILE, "> $myfile") || die "Couldn't open $myfile: $!\n";
print FILE $commonContent;
close(FILE);

Answer 2

Посмотрите на perl's open () .

Вы захотите открыть дескриптор файла и распечатать переменную для этого дескриптора файла.

open(my $fh, '>', "output.html") or die $!;