make examples work

Author: coke

doc/Language/5to6-perlop.pod6

@@ -186,11 +186,10 @@ by L<ff|/routine/ff> and L<fff|/routine/fff> respectively.
 The conditional operator C<? :> has been replaced
 by C<?? !!>:
 
-=begin code
+=for code :lang<perl5>
 $x = $ok  ? $yes  : $no;  # Perl 5
+=for code :preamble<my $x;my $ok;my $yes;my $no>
 $x = $ok ?? $yes !! $no;  # Perl 6
-=end code
-
 
 =head2 Assignment Operators