push @biu_yz, [ @biu_z ]; 

##</code><code>##

$biu[$i][4][$k] = $u25;

##</code><code>##

$biu->[$i][4][$k] = $u25;