in reply to Re^2: concatenating multiple lines without using . operator
in thread concatenating multiple lines without using . operator

$seq{$chr} = join ("",$_);

The join Perl built-in joins a list of strings. In the statement above, the list consists in the single string contained in the  $_ scalar, so the output of  join will be exactly the same as the input.