my @distance_mat=[];
...
my @vit_dist=[ [ 0] ];