#!/usr/bin/perl

use strict;
use warnings;

use YAML::Any qw/DumpFile/;
use RPM::Source::BundleImport::Perl::Eval;
use RPM::Source::BundleImport::Perl::CPAN2RPM_get_meta;

my $unpack_path=shift @ARGV;
die unless defined $unpack_path;

my $_meta=&RPM::Source::BundleImport::Perl::CPAN2RPM_get_meta::cpan2rpm_get_meta($unpack_path);
DumpFile($unpack_path.'/.metadump-cpan2rpm.yml', &RPM::Source::BundleImport::Perl::Eval::collected_data(), $_meta);
