[Duvida] Obtendo dados de um arquivo

[acpguedes]

Boa noite Monges Invaders,

Gostaria de tentar sanar uma duvida com vocês

Digamos que eu tenha um arquivo chamado "dados.txt" no seguinte modelo

acpguedes
21
Invaders
Perl
CPAN 

eu posso acessar qualquer dado desse arquivo por um array da seguinte forma

#!/usr/bin/perl

use common::sense;

open FH, 'dados.txt' or die;
my @lista = <FH>;

print "digite um numero\n";
my $n = <STDIN>;

print $lista[$n], "\n"; 

Logo se eu digitar 2 saira:

21 

Agora se a lista estiver no seguinte formato

acpguedes 21 Invaders Perl CPAN 

o mesmo script postado acima não terá valor nenhum!

O que eu gostaria de perguntar é como pegar algum valor desse arquivo,
por exemplo, se eu digitar "2", imprimir na tela "21".
Pois com esse modelo de arquivo ou imprime toda a linha ou não imprime nada!

Desde já, grato!

[hacker_wap]

Quase toda linguagem que conheço tem uma função para dividir strings.
VB split, php explode, delphi extractstrings, delphi xe splitstring etc...

olhei na documentação do perl e achei o metodo split.
Porem não sei se é a melhor solução.

#!/usr/bin/perl

use warnings;use strict;
my $data = "acpguedes 21 Invaders Perl CPAN";my @list = split(/ /, $data);print $list[3]; 

[fvox]

Hi.

Faz o split através de expressão regular.
Por exemplo, se você mandar dividir por \s+ vai funcionar tanto para múltiplos espaços como para quebra de linha.

[]'s

[acpguedes]

valeu galera, eu não pensei nisso...
valeu mesmo!