!1 perl-File-pushd: package init

Merge pull request !1 from daidai_is_here/dqw_test

perl-File-pushd.spec

@@ -0,0 +1,58 @@
+Name:          perl-File-pushd
+Version:       1.016
+Release:       4
+Summary:       Change directory temporarily for a limited scope
+
+License:       ASL 2.0
+URL:           https://metacpan.org/release/File-pushd
+Source0:       https://cpan.metacpan.org/authors/id/D/DA/DAGOLDEN/File-pushd-%{version}.tar.gz
+
+BuildArch:     noarch
+
+BuildRequires: make perl
+
+%description
+File::pushd does a temporary "chdir" that is easily and automatically
+reverted, similar to "pushd" in some Unix command shells. It works by
+creating an object that caches the original working directory. When the
+object is destroyed, the destructor calls "chdir" to revert to the
+original working directory. By storing the object in a lexical variable
+with a limited scope, this happens automatically at the end of the
+scope.
+
+This is very handy when working with temporary directories for tasks
+like testing; a function is provided to streamline getting a temporary
+directory from File::Temp.
+
+For convenience, the object stringifies as the canonical form of the
+absolute pathname of the directory entered.
+
+Warning: if you create multiple "pushd" objects in the same lexical
+scope, their destruction order is not guaranteed and you might not wind
+up in the directory you expect.
+
+
+%prep
+%autosetup -n File-pushd-%{version} -p1
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor
+%make_build
+
+%install
+%make_install
+
+%check
+make test
+
+%files
+%doc LICENSE README
+/usr/share/perl5/vendor_perl/File/pushd.pm
+/usr/share/man/man3/File::pushd.3pm.gz
+%exclude /usr/lib64/perl5/vendor_perl/auto/File/pushd/.packlist
+%exclude /usr/lib64/perl5/perllocal.pod
+
+
+%changelog
+* Mon Jan 06 2020 daiqianwen <daiqianwen@huawei.com> - 1.016-4
+- Package init