Substituição exercício
split
Linux na web /Formulários/Servidor/Perl/Perl, conceitos básicos/expressões regulares/Como o Perl usa expressões regulares?/

O Perl trabalha com listas e é extremamente simples transformar strings em listas e vice-versa:

@gomos = split(/\s+/,$linha);
Para:
$linha = "asdf 234 asdf 1234 "; temos:

0 'asdf' 1 234 2 'asdf' 3 1234

Substituição exercício

autor: Jorge Kinoshita