CPAN-RPM

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         }
      },
      "configure" : {
         "requires" : {
            "ExtUtils::MakeMaker" : "0"
         }
      },
      "runtime" : {
         "requires" : {
            "ExtUtils::MakeMaker" : "5.4302",
            "HTTP::Request" : "0",
            "LWP::UserAgent" : "0"
         }
      }
   },
   "release_status" : "stable",
   "version" : "2.041",
   "x_serialization_backend" : "JSON::PP version 4.06"
}

META.yml  view on Meta::CPAN

meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: CPAN-RPM
no_index:
  directory:
    - t
    - inc
requires:
  ExtUtils::MakeMaker: '5.4302'
  HTTP::Request: '0'
  LWP::UserAgent: '0'
version: '2.041'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

Makefile.PL  view on Meta::CPAN

    NAME => "CPAN::RPM",
    VERSION_FROM => "lib/CPAN/RPM.pm",
    $] < 5.005 ? () : (
        AUTHOR => 'Erick Calder <ecalder@cpan.org>',
        ABSTRACT_FROM => "lib/CPAN/RPM.pm",
    ),
    EXE_FILES => [ "cpan2rpm" ],
    PREREQ_PM => {
        'ExtUtils::MakeMaker' => 5.4302,
        'LWP::UserAgent' => 0,
        'HTTP::Request' => 0,
    },
    dist => {
        COMPRESS => "gzip -9 -vf",
    },
    ;


package MY;

sub processPL {

cpan2rpm  view on Meta::CPAN

    scalar m#^(https?|ftp)://#;
    }

#    Syntax: content = http_get [url]

sub http_get {
    my $url = shift || $_;

    $HTTPWARN = 1 if $info{dist} =~ /libwww-perl/;

    if ($@ = "", eval "use HTTP::Request::Common; use LWP::UserAgent;", !$@) {
        my $ua = LWP::UserAgent->new();
        $ua->env_proxy();
        return $ua->request(GET($url))->content || "";
        }
    elsif ($HTTPWARN == 0) {
        print "\nWARNING: libwww-perl module not found.  To install, one ";
        print "of the following options may help:\n\n";

        local $\ = $/;
        $url = "http://www.rpmfind.net/linux/rpm2html/search.php";