my @keys_old = sort keys %old;
my @keys_new = sort keys %new;

say +(@keys_old ~~ @keys_new and @{[@old{@keys_old}]} ~~ @{[@new{@keys_new}]}) ? 'yes' : 'no';