chomp (my @lines=); my @due=sort @lines; print "@due\n"; #### print sort chomp (my @lines=);