Foro - Perl en Español

Amigos, tengo un archivo TXT desde el cual debo tomar los campos para luego armar otro archivo txt separados igualmente por tabulación.

Si bien he realizado la captura de otros archivos separados por ';' o '"' o '|' o lo que sea... pero por tabulación no sé cómo hacerlo. Favor, su ayuda.

El archivo es de esta forma:


Este script lo tengo para tomar un archivo separado por '|'. ¿Cómo sería con tabulación?

#!/usr/bin/perl
open (FILE, @ARGV[0]) || die "No pude abrir el archivo @ARGV[0]\n";

foreach $a (<FILE>)
{
@datos=split(/\|/,$a);
$Nombre=@datos[0];

}

Desde ya, gracias por su ayuda.

Me respondo solo

@datos = split(/\ /,$a);


Gracias, de todas maneras.

Mejor así:

@datos = split /\t/, $a;