Ver Tema

gonzalos · 2011-02-03 10:23 @474

Hola a todos

Estoy intentando crear una tabla anidada en cgi. Buscando información en Internet y en perldoc, lo único que he encontrado han sido referencias a listas simples. Este es el código que estoy usando:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

print ul(
    li({-type=>'disc'},['Sneezy','Doc','Sleepy','Happy'])
);

Pero soy incapaz de modificarlo para transformarlo en una lista anidada. ¿Alguien tiene alguna idea de cómo podría hacerse?

Un saludo
Gonzalo

explorer · 2011-02-03 11:16 @511

Con lo anterior, se genera esto:

Syntax: [ Download ] [ Hide ]

Using bash Syntax Highlighting

explorer@casa:~> perl -MCGI=':standard' -E 'say ul(li({-type=>"disc"},[qw(Sneezy Doc Sneezy Happy)]))'
<ul><li type="disc">Sneezy</li> <li type="disc">Doc</li> <li type="disc">Sneezy</li> <li type="disc">Happy</li></ul>
 

¿A qué te refieres a anidada? ¿A que tiene que haber una lista dentro de otra? En ese caso valdría con meter otro ul() dentro de un li().

gonzalos · 2011-02-04 03:52 @203

Hola, explorer.

Sí, me refería a una lista dentro de otra lista. Revisando el código más despacio llegué a la solución que quería.

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

print ul(li('uno'),li('dos'),li('tres',ul(li('cuatro')))

Muchísimas gracias por el apunte.

Un saludo
Gonzalo

Publicidad

Socializa