my $active_directory = '/logg/';
my $working_file = $active_directory . "file_name";
open (FILE, $working_file) or die "Cannot open $working_file\n$!";