http://www.perlmonks.org?node_id=1136336


in reply to array format question

my $somewwpnNames = '"' . join('";"', @array_wwpn) . '";'; print "$somewwpnNames\n";