ossp-pkg/string-divert/sample2.pl 1.2 -> 1.3
--- sample2.pl 2003/05/23 11:09:57 1.2
+++ sample2.pl 2005/11/16 12:08:49 1.3
@@ -16,14 +16,9 @@
" " . $html->folder("body") .
" </body>\n" .
"</html>\n";
-
-# generate header
-$html >> "head";
-$html .= "<title>foo</title>\n";
-$html << 1;
+$html >> "body";
# generate body
-$html >> "body";
$html .= "<table>\n" .
" <tr>\n" .
" <td>\n" .
@@ -35,6 +30,11 @@
" </tr>\n" .
"</table>\n";
+# generate header
+$html >> "head";
+$html .= "<title>foo</title>\n";
+$html << 1;
+
# generate left contents
$html >> "left";
$html .= "bar1\n" .
@@ -45,6 +45,7 @@
$html >> "right";
$html .= "quux1\n" .
"quux2\n";
+$html << 1;
# undivert all diversions and output unfolded HTML
$html << 0;
|
|
