Oi Tarik, o código abaixo leva em consideração que vc pode ter mais dados abaixo do 1234 TESTE. []´s Vinicius =========== use strict; my (@dados); while(<>) { next if /^(CODIGO|=|\s*$)/; push (@dados,split(/\s+/,$_)); }