<div dir="ltr">Puede ser, que simplemente no hay espacios en esta cadena (o estos son unos caracteros que Perl no interpreta como espacio). Puedes probar este:<br><br>split /[^A-Z0-9,.]+/, system("comandos_oracle");<br>
<br>a ver si funciona.<br></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/2/18 Manuel Trujillo (TooManySecrets) <span dir="ltr"><<a href="mailto:toomany@toomany.net" target="_blank">toomany@toomany.net</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Holas!<div><br></div><div>Hacía mucho tiempo que no hacía nada con Perl, y lo estoy pagando con creces...</div>
<div><br></div><div>Tengo un script que ejecuta directamente de sistema una orden para el oracle-asm. De ahí extraigo ésto:</div>


<div><br></div><div>NAME           512   4,096    1,048,576 CONNECTED   EXTERN         139,384         34,572     24.80</div><div><br></div><div>Lo que necesito es trabajar con los tres últimos números. Para ello he probado lo siguiente:</div>



<div><br></div><div>@TOTAL = split(/\s+/,system("comandos_oracle"));<br></div><div>print $total[6];</div><div><br></div><div>No funciona; me dá el bonito mensaje conforme no sabe nada de la variable $total:</div>


<div>"Use of uninitialized value in print at <a href="http://testasm.pl" target="_blank">testasm.pl</a> line..."</div><div><br></div><div>Si digo de hacer el split así:</div><div>@TOTAL = split(/ /,system....);</div>


<div>Pasa exactamente lo mismo (hay un espacio entre / y /).</div><div><br></div><div>También he probado pasando el contenido a $TOTAL, y ejecutando luego el split y asignación:</div><div><br></div>

<div>$TOTAL = system("comandos_oracle");</div><div>@TOTAL = split(/\s+/, $TOTAL); #el split probado con \s y /<espacio>/</div><div><br></div><div>Pero el resultado es exactamente el mismo... sigh...</div>


<div><br></div><div>Seguro que es una tontería que tengo delante (o no), pero, ¿alguien podría echarme un cable por favor?</div><div><br></div><div>Por cierto, he probado un foreach sobre @TOTAL, para ver qué hay en cada posición, y por lo que veo, sencillamente parece que el split *no* se hace (o eso me parece a mí).</div>


<div><br></div><div>Gracias!</div><span class="HOEnZb"><font color="#888888"><div><div><br></div>-- <br>---------------------------------------------------------------------------------------<br>
Have a nice day  ;-)<br>TooManySecrets<br><br>/"\   ASCII Ribbon Campaign  | FreeBSD Since 4.1<br>\ / - NO HTML/RTF in e-mail  | GNU/Linux Since 1993.<br> X  - NO Word docs in e-mail | openSUSE Member since 2008<br>


/ \  - <a href="http://blog.toomany.net" target="_blank">http://blog.toomany.net</a> | <a href="http://twitter.com/toomanysecrets" target="_blank">http://twitter.com/toomanysecrets</a><br>
---------------------------------------------------------------------------------------
</div></font></span></div>
<br>_______________________________________________<br>
llista dels Barcelona-pm<br>
<a href="mailto:Barcelona-pm@pm.org">Barcelona-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/barcelona-pm" target="_blank">http://mail.pm.org/mailman/listinfo/barcelona-pm</a><br>
BCN Perl Mongers: <a href="http://barcelona.pm.org" target="_blank">http://barcelona.pm.org</a><br></blockquote></div><br></div>