Fixed repeated regex serialization

use YAML; #use YAML::XS; use Encode; my $yaml = decode_utf8 q{re : !!perl/regexp OK}; for (1..5) { $data = Load $yaml; $yaml = Dump $data; } say $yaml; __END__ re: !!perl/regexp (?^u:(?^u:(?^u:(?^u:(?^u:OK)))))
Slide 30/88 BACK UP NEXT next: ( space / -> / page up ) | previous: ( backspace / <- / page down ) | next page: ( shift + page down ) | previous page: ( shift + page up ) | index: ( arrow-up )