File _service:tar_scm:perl-autodie.spec of Package perl-autodie

File _service:tar_scm:perl-autodie.spec of Package perl-autodie (Revision 8477f156057bea849a4b25e30eb6e8cc)

Currently displaying revision 8477f156057bea849a4b25e30eb6e8cc , Show latest

Name:       perl-autodie
Version:    2.34
Release:    1
Summary:    Replace functions with ones that succeed or die with lexical scope
License:    GPL or Artistic
URL:	    https://metacpan.org/release/autodie
Source0:    https://cpan.metacpan.org/authors/id/T/TO/TODDR/autodie-%{version}.tar.gz

#prereqs
BuildRequires: gcc perl(ExtUtils::MakeMaker) perl-interpreter perl-generators
#for test
BuildRequires: perl(Test::More) perl(IPC::System::Simple) >= 0.12

Requires:     perl(B) perl(Fcntl) perl(POSIX) perl(:MODULE_COMPAT_%(perl -V:version | cut -d"'" -f 2)) perl(IPC::System::Simple) >= 0.12

BuildArch:    noarch

%global __requires_exclude ^perl\$lib\$$

%description
The autodie pragma provides a convenient way to replace functions that normally return
false on failure with equivalents that throw an exception on failure.

The autodie pragma has lexical scope, meaning that functions and subroutines altered with
autodie will only change their behaviour until the end of the enclosing block, file, or eval.

%package_help

%prep
%autosetup -n autodie-%{version} -p1
find -type f -exec chmod -x {} \;

%build
perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
%make_build

%install
make pure_install DESTDIR=%{buildroot}
%{_fixperms} %{buildroot}/*

%check
make test TEST_VERBOSE=1

%files
%license LICENSE AUTHORS README.md
%{perl_vendorlib}/*

%files help
%doc Changes
%{_mandir}/man3/*

%changelog
* Fri Nov 19 2021 yuanxin <yuanxin24@huawei.com> - 2.34-1
- update version to 2.34

* Sat Jul 25 2020 shixuantong <shixuantong@huawei.com> - 2.32-1
- Type:NA
- ID:NA
- SUG:NA
- DESC:update to 2.32-1

* Mon Oct 28 2019 shenyangyang <shenyangyang4@huawei.com> - 2.29-398
- Type:enhancement
- ID:NA
- SUG:NA
- DESC:delete unneeded build requires of perl(BSD::Resource) 
       perl(Import::Into) >= 1.002004 and perl(Sub::Identify)

* Tue Aug 27 2019 openEuler Buildteam <buildteam@openeuler.org> - 2.29-397
- Package init