No debes usar system, sino qx().
system() devuelve el resultado de la operación (0 = sin error. -1 o 1 = hubo un error. El byte alto indicará el tipo de error).
En cambio,
qx() devolverá la salida de la ejecución del comando.
Código:
@s = split("\n", qx(ls -1));