Yo hago una consulta a la base de datos, lo cual me devuelve aprox. 15 resultados. Los quiero meter a una variable la cual la tengo que utilizar para otra query. El problema es que no logro llenar la variable con la estructura deseada.
Using perl Syntax Highlighting
my $sth1 = $dbSeg->prepare("select groupid from reportes where repoid='IEF14'");
$sth1->execute( ) or die $DBI::errstr;
while ( @grupos = $sth1->fetchrow_array ) {
push(@prueba , join(',', map {qq('$_')} @grupos));
}
$sth1->execute( ) or die $DBI::errstr;
while ( @grupos = $sth1->fetchrow_array ) {
push(@prueba , join(',', map {qq('$_')} @grupos));
}
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
me devuelve
- Código: Seleccionar todo
['101' '102' '104' '105' '106' '107' '108' '109' '110' '111' '112' '113' '114' '115' '116']
¿Por qué no me funciona el join() con la coma?
El resultado que yo deseo es
- Código: Seleccionar todo
['101' ,'102' ,'104' ,'105' ,'106' ,'107' ,'108' ,'109' ,'110' ,'111' ,'112' ,'113' ,'114' ,'115' ,'116']