=cut
-our $NO_YAML_XS_WARNING;
-
sub load {
my $class = shift;
my $file = shift;
return YAML::XS::LoadFile( $file );
}
- Carp::carp
- 'Use of YAML::Syck or YAML to parse config files is DEPRECATED. '
- . 'Please install YAML::XS for proper YAML support'
- unless $NO_YAML_XS_WARNING;
-
eval { require YAML::Syck; YAML::Syck->VERSION( '0.70' ) };
unless ( $@ ) {
open( my $fh, $file ) or die $!;
=head1 COPYRIGHT AND LICENSE
-Copyright 2006-2011 by Brian Cassidy
+Copyright 2006-2013 by Brian Cassidy
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.