M
Marek
Hello all!
I have a cgi problem, which I can not resolve alone.
I have a multidimensional array, to create a form like follows:
my @element_liste = (
{
type => "text",
name => "firma",
bez => "Firma:",
size => 36
},
etc.
my cgi script iterates over this array to create the form:
foreach my $f ( @{$element_liste_ref} ) {
my $type = $f->{type};
my $bez = $f->{bez};
if ( $type eq "text" ) {
push(
@zeile,
Tr(
td($bez),
td(
textfield(
-name => $f->{name},
-size => $f->{size}
)
)
)
);
}}
etc
Like that every table row is stocked into @zeile for later printing,
like follows:
tr
=================================================================
td td
| $bez | <input type="text" name="firma" size="36" /
But now I have the problem, that I need to add a dimension more for
the date. Explication:
,
{
type => "popup",
name => "time",
bez => "day/month/year/ - hh:mm",
value => [ "01", "02", "03", etc. ]
},
{
type => "popup",
name => "time",
bez => "day/month/year/ - hh:mm",
value => [ "Jan", "Feb", etc. ],
},
{
type => "popup",
name => "time",
bez => "day/month/year/ - hh:mm",
value => [ "2009", "2010", "2011", "2012" ],
}
etc
And I need the cgi to creat *ONE* table row only with day/month/year -
hour:min
tr
=================================================================
td td
| $bez | <select name="time"> |
| | <option value="01"> |
| | 01 = days |
| | etc. |
| | same for /month/year - hour:min |
=================================================================
Could be somebody so kind, to help me with this?
Best greetings from Munich
marek
I have a cgi problem, which I can not resolve alone.
I have a multidimensional array, to create a form like follows:
my @element_liste = (
{
type => "text",
name => "firma",
bez => "Firma:",
size => 36
},
etc.
my cgi script iterates over this array to create the form:
foreach my $f ( @{$element_liste_ref} ) {
my $type = $f->{type};
my $bez = $f->{bez};
if ( $type eq "text" ) {
push(
@zeile,
Tr(
td($bez),
td(
textfield(
-name => $f->{name},
-size => $f->{size}
)
)
)
);
}}
etc
Like that every table row is stocked into @zeile for later printing,
like follows:
tr
=================================================================
td td
| $bez | <input type="text" name="firma" size="36" /
=================================================================
But now I have the problem, that I need to add a dimension more for
the date. Explication:
,
{
type => "popup",
name => "time",
bez => "day/month/year/ - hh:mm",
value => [ "01", "02", "03", etc. ]
},
{
type => "popup",
name => "time",
bez => "day/month/year/ - hh:mm",
value => [ "Jan", "Feb", etc. ],
},
{
type => "popup",
name => "time",
bez => "day/month/year/ - hh:mm",
value => [ "2009", "2010", "2011", "2012" ],
}
etc
And I need the cgi to creat *ONE* table row only with day/month/year -
hour:min
tr
=================================================================
td td
| $bez | <select name="time"> |
| | <option value="01"> |
| | 01 = days |
| | etc. |
| | same for /month/year - hour:min |
=================================================================
Could be somebody so kind, to help me with this?
Best greetings from Munich
marek