3 plan tests => ~~blocks;
9 --- encoded base64_decode
20 c3ViIHJ1bigmKSB7CiAgICBteSAkc2VsZiA9ICRkZWZhdWx0X29iamVjdDsKICAgIG15ICRjYWxs
21 YmFjayA9IHNoaWZ0OwogICAgZm9yIG15ICRibG9jayAoJHNlbGYtPmJsb2NrcykgewogICAgICAg
22 ICZ7JGNhbGxiYWNrfSgkYmxvY2spOwogICAgfQp9Cg==
24 --- decoded base64_encode
27 my $self = $default_object;
29 for my $block ($self->blocks) {