my ( $var, @arr1, @arr2, @arr3 ) = 0;