cgi.pm

[alex]

ok, hier nun mal ein Codeschnipsel:

__CODE__

my @rows;

push (@rows, Tr (th (["1", "1", "1"])));
push (@rows, Tr (th (["2", "2", "2"])));
push (@rows, Tr (th (["3", "3", "3"])));
push (@rows, Tr (th (["4", "4", "4"])));

print table ({-border => 1}, @rows);

__CODE__

an sowas dachte ich...
und genau bei der Vereinfachung hätte ich gerne Zeilenumbrüche möglichst geschickt eingebunden...

local($") = '\n'; macht leider auch nicht das Gewünschte .-(

gruß