Muito bem,

Eu sou novo para Perl ser tão gentil. Dado o seguinte script:
----
open (FILE, "<file.txt");

@ linhas \u003d <file>;
close (FILE);

print $ var \u003d $ linhas [18];
----

Então, eu estou imprimindo linha 18 do arquivo "file.txt". Agora eu quero a 5 ª coluna, a menos barra. A linha tem o seguinte aspecto:

TUV 1 / 3,2 / 4,5 / 3,1 /

Eu tentei fazer:

print $ var | perl pae-'$_\u003d"$ F [5] \ n "";, mas recebo lixo.

thanks in advance.