init

2019-12-19 11:36:48 +08:00 · 2019-12-19 11:36:48 +08:00 · 9fa22271df
commit 9fa22271df
parent ba748d50d1
5 changed files with 118 additions and 75 deletions
--- a/README.en.md
+++ b/README.en.md
@ -1,36 +0,0 @@
-# perl-libwww-perl
-
-#### Description
-{**When you're done, you can delete the content in this README and update the file with details for others getting started with your repository**}
-
-#### Software Architecture
-Software architecture description
-
-#### Installation
-
-1.  xxxx
-2.  xxxx
-3.  xxxx
-
-#### Instructions
-
-1.  xxxx
-2.  xxxx
-3.  xxxx
-
-#### Contribution
-
-1.  Fork the repository
-2.  Create Feat_xxx branch
-3.  Commit your code
-4.  Create Pull Request
-
-
-#### Gitee Feature
-
-1.  You can use Readme\_XXX.md to support different languages, such as Readme\_en.md, Readme\_zh.md
-2.  Gitee blog [blog.gitee.com](https://blog.gitee.com)
-3.  Explore open source project [https://gitee.com/explore](https://gitee.com/explore)
-4.  The most valuable open source project [GVP](https://gitee.com/gvp)
-5.  The manual of Gitee [https://gitee.com/help](https://gitee.com/help)
-6.  The most popular members  [https://gitee.com/gitee-stars/](https://gitee.com/gitee-stars/)
--- a/README.md
+++ b/README.md
@ -1,39 +0,0 @@
-# perl-libwww-perl
-
-#### 介绍
-{**以下是码云平台说明，您可以替换此简介**
-码云是 OSCHINA 推出的基于 Git 的代码托管平台（同时支持 SVN）。专为开发者提供稳定、高效、安全的云端软件开发协作平台
-无论是个人、团队、或是企业，都能够用码云实现代码托管、项目管理、协作开发。企业项目请看 [https://gitee.com/enterprises](https://gitee.com/enterprises)}
-
-#### 软件架构
-软件架构说明
-
-
-#### 安装教程
-
-1.  xxxx
-2.  xxxx
-3.  xxxx
-
-#### 使用说明
-
-1.  xxxx
-2.  xxxx
-3.  xxxx
-
-#### 参与贡献
-
-1.  Fork 本仓库
-2.  新建 Feat_xxx 分支
-3.  提交代码
-4.  新建 Pull Request
-
-
-#### 码云特技
-
-1.  使用 Readme\_XXX.md 来支持不同的语言，例如 Readme\_en.md, Readme\_zh.md
-2.  码云官方博客 [blog.gitee.com](https://blog.gitee.com)
-3.  你可以 [https://gitee.com/explore](https://gitee.com/explore) 这个地址来了解码云上的优秀开源项目
-4.  [GVP](https://gitee.com/gvp) 全称是码云最有价值开源项目，是码云综合评定出的优秀开源项目
-5.  码云官方提供的使用手册 [https://gitee.com/help](https://gitee.com/help)
-6.  码云封面人物是一档用来展示码云会员风采的栏目 [https://gitee.com/gitee-stars/](https://gitee.com/gitee-stars/)
--- a/libwww-perl-6.19-Accept-proxy-URLs-with-IPv6-host-names.patch
+++ b/libwww-perl-6.19-Accept-proxy-URLs-with-IPv6-host-names.patch
@ -0,0 +1,31 @@
+From 572538753601755b4b6acace1d445bc8e1cc10c8 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
+Date: Thu, 16 Feb 2017 14:00:57 +0100
+Subject: [PATCH] Accept proxy URLs with IPv6 host names
+MIME-Version: 1.0
+Content-Type: text/plain; charset=UTF-8
+Content-Transfer-Encoding: 8bit
+
+<https://rt.cpan.org/Public/Bug/Display.html?id=94654>
+
+Signed-off-by: Petr Písař <ppisar@redhat.com>
+---
+ lib/LWP/UserAgent.pm | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/lib/LWP/UserAgent.pm b/lib/LWP/UserAgent.pm
+index ea03157..8549808 100644
+--- a/lib/LWP/UserAgent.pm
+++ b/lib/LWP/UserAgent.pm
+@@ -1039,7 +1039,7 @@ sub proxy
+         my $url = shift;
+         if (defined($url) && length($url)) {
+             Carp::croak("Proxy must be specified as absolute URI; '$url' is not") unless $url =~ /^$URI::scheme_re:/;
+-            Carp::croak("Bad http proxy specification '$url'") if $url =~ /^https?:/ && $url !~ m,^https?://\w,;
+            Carp::croak("Bad http proxy specification '$url'") if $url =~ /^https?:/ && $url !~ m,^https?://(?:\w|\[),;
+         }
+         $self->{proxy}{$key} = $url;
+         $self->set_my_handler("request_preprepare", \&_need_proxy)
+-- 
+2.7.4
+
--- a/libwww-perl-6.35.tar.gz
+++ b/libwww-perl-6.35.tar.gz
--- a/perl-libwww-perl.spec
+++ b/perl-libwww-perl.spec
@ -0,0 +1,87 @@
+%global __requires_exclude %{?__requires_exclude:%{__requires_exclude}|}^perl\\((Authen::NTLM|Encode|File::Listing|HTTP::Date|HTTP::Negotiate|HTTP::Request|HTTP::Response|HTTP::Status|LWP::MediaTypes|MIME::Base64|Net::FTP|Net::HTTP|URI|WWW::RobotRules)\\)$
+
+Name:           perl-libwww-perl
+Version:        6.35
+Release:        2
+Summary:        The World-Wide Web library for Perl
+License:        GPL+ or Artistic
+URL:            https://metacpan.org/release/libwww-perl
+Source0:        https://cpan.metacpan.org/authors/id/E/ET/ETHER/libwww-perl-%{version}.tar.gz
+Patch0000:      libwww-perl-6.19-Accept-proxy-URLs-with-IPv6-host-names.patch
+BuildArch:      noarch
+
+BuildRequires:  perl-generators perl-interpreter perl(:VERSION) >= 5.8.1
+BuildRequires:  perl(CPAN::Meta::Requirements) >= 2.120620 perl(ExtUtils::MakeMaker) >= 6.76
+BuildRequires:  perl(File::Copy) perl(Getopt::Long) perl(Module::Metadata) perl(strict) perl(warnings)
+BuildRequires:  perl(base) perl(Carp) perl(Digest::MD5) perl(Encode) >= 2.12 perl(Encode::Locale)
+BuildRequires:  perl(Exporter) perl(HTML::Entities) perl(HTML::HeadParser) perl(HTTP::Config)
+BuildRequires:  perl(HTTP::Date) >= 6 perl(HTTP::Headers::Util) perl(HTTP::Request) >= 6
+BuildRequires:  perl(HTTP::Request::Common) >= 6 perl(HTTP::Response) >= 6 perl(HTTP::Status) >= 6
+BuildRequires:  perl(IO::Select) perl(IO::Socket) perl(LWP::MediaTypes) >= 6
+BuildRequires:  perl(MIME::Base64) >= 2.1 perl(Net::HTTP) >= 6.07 perl(parent)
+BuildRequires:  perl(Scalar::Util) perl(Try::Tiny) perl(URI) >= 1.10 perl(URI::Escape)
+BuildRequires:  perl(WWW::RobotRules) >= 6 perl(Config) perl(File::Spec)
+BuildRequires:  perl(File::Temp) perl(FindBin) perl(HTTP::Daemon) >= 6
+BuildRequires:  perl(Test::Fatal) perl(Test::More) perl(Test::RequiresInternet)
+BuildRequires:  perl(utf8) perl(Test::Needs)
+
+BuildConflicts: perl(HTTP::Status) = 6.17
+
+Requires:       perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+Requires:       perl(Authen::NTLM) >= 1.02 perl(Encode) >= 2.12
+Requires:       perl(HTML::HeadParser) perl(HTTP::Config) perl(HTTP::Cookies) >= 6
+Requires:       perl(HTTP::Date) >= 6 perl(HTTP::Headers::Util) perl(HTTP::Negotiate) >= 6
+Requires:       perl(HTTP::Request) >= 6 perl(HTTP::Request::Common) >= 6 perl(HTTP::Response) >= 6
+Requires:       perl(HTTP::Status) >= 6 perl(LWP::MediaTypes) >= 6 perl(MIME::Base64) >= 2.1
+Requires:       perl(Net::FTP) >= 2.58 perl(Net::HTTP) >= 6.07 perl(URI) >= 1.10
+Requires:       perl(URI::Escape) perl(WWW::RobotRules) >= 6
+
+Suggests:       perl(CPAN::Config) perl(HTML::FormatPS) perl(HTML::FormatText)
+Suggests:       perl(HTML::Parse) perl(LWP::Protocol::https) >= 6.02
+
+Provides:       perl(LWP::Debug::TraceHTTP::Socket) = %{version}
+Provides:       perl(LWP::Protocol::http::Socket) = %{version}
+Provides:       perl(LWP::Protocol::http::SocketMethods) = %{version}
+
+%description
+The libwww-perl collection is a set of Perl modules which provides a simple
+and consistent application programming interface (API) to the World-Wide Web.
+The main focus of the library is to provide classes and functions that allow
+you to write WWW clients. The library also contain modules that are of more general
+use and even classes that help you implement simple HTTP servers.
+
+%package help
+Summary:        Documentation for perl-libwww-perl
+
+%description help
+Documentation for perl-libwww-perl.
+
+%prep
+%autosetup -n libwww-perl-%{version} -p1
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1 --aliases < /dev/null
+%make_build
+
+%install
+make pure_install DESTDIR=$RPM_BUILD_ROOT
+%{__chmod} -Rf a+rX,u+w,g-w,o-w $RPM_BUILD_ROOT/*
+
+%check
+unset PERL_LWP_ENV_HTTP_TEST_SERVER_TIMEOUT PERL_LWP_ENV_HTTP_TEST_URL
+make test
+
+%files
+%license LICENSE
+%{_bindir}/*
+%{perl_vendorlib}/
+%exclude %{_libdir}/perl5/perllocal.pod
+
+%files help
+%doc Changes README.SSL
+%{_mandir}/man1/
+%{_mandir}/man3/
+
+%changelog
+* Thu Oct 24 2019 Zaiwang Li <lizaiwang1@huawei.com> - 6.35-2
+- Init package.