print join( $", @array ), "\n";