CPAN/Meta/YAML.pm

4 package CPAN::Meta::YAML; # git description: v1.68-2-gcc5324e
8 $CPAN::Meta::YAML::VERSION = '0.018';
12 # The CPAN::Meta::YAML API.
26     return CPAN::Meta::YAML->new(@_)->_dump_string;
33     my $self = CPAN::Meta::YAML->_load_string(@_);
37         # To match YAML.pm, return the last document
51     return CPAN::Meta::YAML->new(@_)->_dump_file($file);
56     my $self = CPAN::Meta::YAML->_load_file($file);
60         # Return only the last document to match YAML.pm,
69 # Create an empty CPAN::Meta::YAML object
75 # "API" of CPAN::Meta::YAML.  I'd support deprecating it, but Adam suggested
76 # we not change it until YAML.pm's own OO API is established so that
88 # this is a legacy quirk to CPAN::Meta::YAML it's ok, but I'd prefer not
136 # CPAN::Meta::YAML or not. Probably yes.
139 # default YAML schema. They need quotes if they are strings.
160 # CPAN::Meta::YAML Implementation.
244         # Strip the initial YAML header
245         @lines and $lines[0] =~ /^\%YAML[: ][\d\.]+.*\z/ and shift @lines;
254                 if ( defined $1 and $1 !~ /^(?:\#.+|\%YAML[: ][\d\.]+)\z/ ) {
274                 die \"CPAN::Meta::YAML failed to classify the line '$lines[0]'";
294                 die \"CPAN::Meta::YAML failed to classify the line '$lines[0]'";
325 # Load a YAML scalar string to the actual Perl scalar
347         die \"CPAN::Meta::YAML does not support a feature in line '$string'";
354         die \"CPAN::Meta::YAML found illegal characters in plain scalar: '$string'"
362     die \"CPAN::Meta::YAML failed to find multi-line scalar content" unless @$lines;
368         die \"CPAN::Meta::YAML found bad indenting in line '$lines->[0]'";
402             die \"CPAN::Meta::YAML found bad indenting in line '$lines->[0]'";
438                 die \"CPAN::Meta::YAML failed to classify line '$lines->[0]'";
459             die \"CPAN::Meta::YAML failed to classify line '$lines->[0]'";
484             die \"CPAN::Meta::YAML found bad indenting in line '$lines->[0]'";
508             die \"CPAN::Meta::YAML does not support a feature in line '$lines->[0]'";
511             die \"CPAN::Meta::YAML failed to classify line '$lines->[0]'";
515             warn "CPAN::Meta::YAML found a duplicate key '$key' in line '$lines->[0]'";
695         die \"CPAN::Meta::YAML does not support circular references";
724             die \"CPAN::Meta::YAML does not support $type references";
734         die \"CPAN::Meta::YAML does not support circular references";
764             die \"CPAN::Meta::YAML does not support $type references";
791     Carp::carp( "CPAN::Meta::YAML->errstr and \$CPAN::Meta::YAML::errstr is deprecated" )
806 # XXX-INGY Is flock CPAN::Meta::YAML's responsibility?
809 # to be locking whenever possible.  People (foolishly) use YAML
856 delete $CPAN::Meta::YAML::{refaddr};
877 CPAN::Meta::YAML - Read and write a subset of YAML for CPAN Meta files
885     use CPAN::Meta::YAML;
890     $yaml = CPAN::Meta::YAML->read_string($yaml_text)
891       or die CPAN::Meta::YAML->errstr;
898       or die CPAN::Meta::YAML->errstr;
904 This module implements a subset of the YAML specification for use in reading
906 not be used for any other general YAML parsing or generation task.
914 This module is currently derived from L<YAML::Tiny> by Adam Kennedy.  If
916 a bug report in the YAML::Tiny bugtracker:
917 L<https://github.com/Perl-Toolchain-Gang/YAML-Tiny/issues>
921 L<YAML::Tiny>, L<YAML>, L<YAML::XS>
949 # ABSTRACT: Read and write a subset of YAML for CPAN Meta files