Select Code to Download

your_function(\@lis_array);

open my $kerlis, '<', $lis_file or die $!;
your_function($kerlis);
...
    # do something
  }
}