open (INF,"sortby_list.dat");
@file=<INF>;
close(INF);