@array = qw( a b c d ) ;
		  
		  @array{ @array } = ( [ @array ] ) x @array ;