@a = 'a'..'b'; print $z = @a[0,1] = @a[ 1, 0 ];; 2