$ perl -Mstrict -Mwarnings -le ' my @numbers; push @numbers, split while <>; print "@numbers"; ' pm_1049671_temp.txt pm_1049671_2temp.txt a b c d e f g h i j k l m n o p q r