В статье приведена спецификация модуля HTML::Phl для работы с HTML-документами, содержащими код языка программирования Perl.
Задача модуля HTML::Phl — выбрать из текстового документа формата HTML, размещенный в нем особым образом perl-код, выполнить кое-какие манипуляции над ним и остальным кодом, объединить полученное в единый код perl и «скормить» всё это 'eval', получая на выходе сгенерированную HTML-страницу, воспроизводимую веб-браузером.
Пример
1 <HTML>
2 <HEAD>
3 <META content="text/html; charset=UTF-8" http-equiv="Content-Type">
4 <TITLE>Пример PHL</TITLE>
5 </HEAD>
6
7 Создаем два дочерних процесса f1 и f2<br>
8
9 %pl include("process_win.phl", "fork decode=cp1251", "f1");
10 %pl include("process_utf.phl", "fork decode=utf8", "f2");
11
12 Ждем завершения процессов<br>
13
14 <%pl my %join = include("JOIN", "f1 f2"); %>
15
16 Результаты выполнения процессов<br>
17
18 <%pl
19 foreach my $key(keys(%join)) {
20 if (ref $join{$key}) {
21 print "процесс '$key' - результат: ";
22 for (my $i = 0; $i <= $#{$join{$key}}; $i++) {
23 print "'${$join{$key}}[$i]' ";
24 }
25 print "<br>";
26 } else {
27 print "процесс '$key' - результат: '$join{$key}'<br>";
28 }
29 }
30 %>
31
32 </HTML>
Статья написана в ознакомительных целях, разработка модуля носит концептуальный характер, и его надежное применение нуждается в дополнительном тестировании.