open my $file, '<', $filename or die "Unable to open '$filename': $!";
my %edit;
for (<$file>) {
  next if //;
  chomp;
  # Some code to get a $key with an appropriate value
  $edit{$key} = $_;
}
close $file;