Help for this page

Select Code to Download


  1. or download this
    my %trial_hash = ( ABC => "john",
                   DEF => "mike", 
);
  2. or download this
    my $tmpl = HTML::Template->new(scalarref => \ <<EO_TMPL
<!DOCTYPE HTML>
...
</tbody></table></body></html>
EO_TMPL
);
  3. or download this
    $tmpl->param(
    TH => [ map { CELL => $_ }, qw( Type Value ) ],
    TD => [ map { CELL => $_ }, (each %trial_hash),
    ],
);
  4. or download this
    <!DOCTYPE HTML>
<html><head><title>Table</title></head>
...
</thead>
<tbody><td>ABC</td><td>john</td>
</tbody></table></body></html>
  5. or download this
    <tbody><TMPL_LOOP TR><tr>
       <TMPL_LOOP TD><td><TMPL_VAR CELL></td></TMPL_LOOP>
       </tr></TMPL_LOOP>
</tbody></table></body></html>
  6. or download this
        TR => [
        { TD => [ map { CELL => $_ }, (each %trial_hash) ] },
        { TD => [ map { CELL => $_ }, (each %trial_hash) ] },
    ],