Help for this page
system("map > temp"); open(M, "<temp") or die ...; @dmap=<M>; close(M);
open(M, "map|") or die ...; @dmap=<M>; close(M);