diff --git a/Test-SubCalls-1.10.tar.gz b/Test-SubCalls-1.10.tar.gz
new file mode 100644
index 0000000..132c24c
Binary files /dev/null and b/Test-SubCalls-1.10.tar.gz differ
diff --git a/perl-Test-SubCalls.spec b/perl-Test-SubCalls.spec
new file mode 100644
index 0000000..3bf7652
--- /dev/null
+++ b/perl-Test-SubCalls.spec
@@ -0,0 +1,66 @@
+Name:           perl-Test-SubCalls
+Version:        1.10
+Release:        1
+Summary:        Track the number of times subs are called
+License:        GPL+ or Artistic
+URL:            https://metacpan.org/release/Test-SubCalls
+Source0:        https://cpan.metacpan.org/authors/id/E/ET/ETHER/Test-SubCalls-%{version}.tar.gz
+BuildArch:      noarch
+# Build
+BuildRequires:  coreutils
+BuildRequires:  findutils
+BuildRequires:  make
+BuildRequires:  perl-generators
+BuildRequires:  perl(ExtUtils::MakeMaker)
+BuildRequires:  perl(warnings)
+# Runtime
+BuildRequires:  perl(Exporter)
+BuildRequires:  perl(File::Spec) >= 0.80
+BuildRequires:  perl(Hook::LexWrap) >= 0.20
+BuildRequires:  perl(strict)
+BuildRequires:  perl(Test::Builder)
+BuildRequires:  perl(Test::More) >= 0.42
+BuildRequires:  perl(vars)
+# Test Suite
+BuildRequires:  perl(File::Spec::Functions)
+BuildRequires:  perl(Test::Builder::Tester)
+# Optional Tests
+BuildRequires:  perl(CPAN::Meta) >= 2.120900
+# Dependencies
+Requires:       perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+
+%description
+There are a number of different situations (like testing caching code) where
+you want to want to do a number of tests, and then verify that some underlying
+subroutine deep within the code was called a specific number of times. This
+module provides a number of functions for doing testing in this way, in
+association with your normal Test::More (or similar) test scripts.
+
+%prep
+%setup -q -n Test-SubCalls-%{version}
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor
+make %{?_smp_mflags}
+
+%install
+make pure_install DESTDIR=%{buildroot}
+find %{buildroot} -type f -name .packlist -delete
+%{_fixperms} -c %{buildroot}
+
+%check
+make test
+
+%files
+%if 0%{?_licensedir:1}
+%license LICENSE
+%else
+%doc LICENSE
+%endif
+%doc Changes CONTRIBUTING README
+%{perl_vendorlib}/Test/
+%{_mandir}/man3/Test::SubCalls.3*
+
+%changelog
+* Wed Jul 06 2022 misaka00251 <misaka00251@misakanet.cn> - 1.10-1
+- Init package (Thanks to fedora team)