diff options
Diffstat (limited to 'perl.req-from-meta')
-rwxr-xr-x | perl.req-from-meta | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl.req-from-meta b/perl.req-from-meta index 243f54f..5b612dd 100755 --- a/perl.req-from-meta +++ b/perl.req-from-meta @@ -3,7 +3,8 @@ use strict; use warnings; -use YAML qw{ Load }; +use JSON qw{ from_json }; +use YAML qw{ Load }; # slurp the file my $path = shift; @@ -12,7 +13,9 @@ my $data = do { local $/; <$fh> }; close $fh; # parse meta - either yaml or json -my $meta = Load($data); +my $meta = $path =~ /\.yml$/ + ? Load( $data ) + : from_json( $data ); # dump the requires with their version my $requires = $meta->{requires}; |