open KERLIS, "<$lis_file";
@lis_array=<KERLIS>;