Perl Programming - Converting arrays into strings