local $/ = "\n\n";
@notes{ @dates } = map { chomp; $_ } <NOTES>;