How can I store entire contents of a Perl array to a scalar variable?

Question

How can I store entire contents of an array to a scalar variable. eg:

my $code = do { local $/; <FILE HANDLE>; };

This works fine for file handles but I need this for an array.

Answer 1

Use join.

my $str = join '', @array;