Select Code to Download

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

@array_wwpn when printed it contains before chomp and join is applied 
+looks like
10000090fa2edda0
...

I need the  $somewwpnNames to contain like this
 $somewwpnNames="10000090fa2edda0";"10000090fa2edd9f";"10000000c9cdcc6
+c";10000000c9cdcc6d";