diff --git a/cpan2rpm/cpan2rpm b/cpan2rpm/cpan2rpm index 28e8b01..165dc0e 100755 --- a/cpan2rpm/cpan2rpm +++ b/cpan2rpm/cpan2rpm @@ -475,6 +475,7 @@ sub get_meta { for (keys %$deps) { my $use = "use $_"; $use .= " $deps->{$_}" if $deps->{$_}; + $use = "use $deps->{$_}" if $_ eq 'perl'; local $^W = 0; $@ = ""; eval $use;