Re: How to use cgi table in index.pm perl

Have a look at a templating engine like Template::Toolkit, or perhaps HTML::Tiny:

use warnings;
use strict;
use HTML::Tiny;

my $hashref = {
    'Adam'  => 'Eve',
    'Clyde' => 'Bonnie',
};

my $h = HTML::Tiny->new;
print $h->table( [ $h->tr(
    [ $h->th( 'Foo', 'Bar' ) ],
    map( {
        [ $h->td( $_, $hashref->{$_} ) ]
    } sort keys %$hashref )
) ] );

__END__

<table><tr><th>Foo</th><th>Bar</th></tr>
<tr><td>Adam</td><td>Eve</td></tr>
<tr><td>Clyde</td><td>Bonnie</td></tr>
</table>
[download]

Comment on Re: How to use cgi table in index.pm perl Download Code

Replies are listed 'Best First'.
Re^2: How to use cgi table in index.pm perl by Tabish (Acolyte) on Dec 13, 2017 at 11:11 UTC
Thank you. but i cant use print in index.pm	[reply]
Re^3: How to use cgi table in index.pm perl by haukex (Archbishop) on Dec 13, 2017 at 11:24 UTC
i cant use print in index.pm `$h->table(...)` returns a string, which you can save in a variable and return from a function like your `sub getContent`.	[reply] [d/l] [select]
Re^4: How to use cgi table in index.pm perl by Tabish (Acolyte) on Dec 13, 2017 at 12:13 UTC
I treid but doesnt work for me	[reply]
Re^5: How to use cgi table in index.pm perl by haukex (Archbishop) on Dec 13, 2017 at 12:38 UTC
Re^5: How to use cgi table in index.pm perl by poj (Abbot) on Dec 13, 2017 at 15:54 UTC
Re^6: How to use cgi table in index.pm perl by Anonymous Monk on Dec 19, 2017 at 00:35 UTC