sub get_file_from_log(){
   my $log_name=shift;
   open(my $log_file, "<", $log_name);

##</code><code>##

   open(my $log_file, "<", $log_name);
   my $file_name;
   while (<logFile>){