%map =
   map
   { m/^ default_ (option_.+) $/x
     ? ( $1 => $def{ $_ } )
     : ()
   }
   keys %def ;

@s{ keys %map } = values %map;