Hi all,
How can I create tables dynamically with CGI? I have the following:
#################
print $DRepA-> table({-class=>'VersionControl',-width=>'100%'},
$DRepA->Tr({-class=>'Header'},
[
$DRepA->td(["Modification date", "Name", "Description", "Version"])
]
),
$DRepA->Tr(
[
$DRepA->td(["November 9, 2005", "Javier Moreno", "Creation", "0.1"])
]
),
$DRepA->Tr(
[
$DRepA->td(["April 6, 2006", "Javier Moreno", "Complete revamp", "1.0"])
]
),
);
#################
Basically, how can I do the following:
#################
print $DRepA-> table({-class=>'VersionControl',-width=>'100%'},
$DRepA->Tr({-class=>'Header'},
[
$DRepA->td(["Modification date", "Name", "Description", "Version"])
]
),
foreach
(@{$sql_fetched_array}) {
$DRepA->Tr(
[
$DRepA->td([EMAIL PROTECTED],@{$_}[1],@{$_}[2]])
]
),
}
);
#################
Thanks and regards,
Javier Moreno
-------------
Eaton | Truck Components
Systems Engineer - Transmissions
"When you have eliminated all which is impossible, then whatever
remains, however improbable, must be the truth" - Sherlock Holmes
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
