Select Code to Download

sub _has_flags {
    my $check_flag = _names_to_flags(@_);
...
        return 0;
    }
}

$VAR1 = {
          "\$mode" => "<:encoding(utf8)",
...
#             "FASTGETS"
#           ]
#         ];

$VAR1 = {
          "\$fh" => \*{"main::\$fh"},
...
FL=00404400,00000000010000000100010000000000
CK=00004000,00000000000000000100000000000000