Select Code to Download

my $fn = 'C:/Users/katragas/Desktop/apadmin_get_status_log.txt';
open my $my_file, '<', $fn or die "Cannot open $fn: $!\n";
...
} else {
    print "'Response Queue Size' not found.\n";
}

my $fn = 'C:/Users/katragas/Desktop/apadmin_get_status_log.txt';
open my $my_file, '<', $fn or die "Cannot open $fn: $!\n";
...
}
print "'Response Queue Size' found $found times\n";
close $my_file;