diff --git a/Text-CSV-2.01.tar.gz b/Text-CSV-2.01.tar.gz
new file mode 100644
index 0000000..56b0169
Binary files /dev/null and b/Text-CSV-2.01.tar.gz differ
diff --git a/perl-Text-CSV.spec b/perl-Text-CSV.spec
new file mode 100644
index 0000000..4bcb57a
--- /dev/null
+++ b/perl-Text-CSV.spec
@@ -0,0 +1,69 @@
+Name:           perl-Text-CSV
+Version:        2.01
+Release:        1
+Summary:        Comma-separated values manipulator
+License:        GPL+ or Artistic
+URL:            https://metacpan.org/release/Text-CSV
+Source0:        https://cpan.metacpan.org/authors/id/I/IS/ISHIGAKI/Text-CSV-%{version}.tar.gz
+BuildArch:      noarch
+BuildRequires:  coreutils
+BuildRequires:  make
+BuildRequires:  perl-generators
+BuildRequires:  perl-interpreter
+BuildRequires:  perl(ExtUtils::MakeMaker) >= 6.76
+BuildRequires:  perl(lib)
+# Run-time:
+BuildRequires:  perl(bytes)
+BuildRequires:  perl(Carp)
+BuildRequires:  perl(Exporter)
+BuildRequires:  perl(IO::Handle)
+BuildRequires:  perl(overload)
+BuildRequires:  perl(strict)
+BuildRequires:  perl(vars)
+# Test:
+BuildRequires:  perl(base)
+BuildRequires:  perl(charnames)
+BuildRequires:  perl(Config)
+BuildRequires:  perl(Data::Dumper)
+BuildRequires:  perl(Test::More)
+BuildRequires:  perl(Tie::Scalar)
+BuildRequires:  perl(warnings)
+# Optional tests:
+BuildRequires:  perl(Test::Pod) >= 1.00
+Requires:       perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version))
+Requires:       perl(IO::Handle)
+Suggests:       perl(Text::CSV_XS) >= 1.46
+
+%{?perl_default_filter}
+
+%description
+Text::CSV provides facilities for the composition and decomposition of
+comma-separated values.  An instance of the Text::CSV class can combine
+fields into a CSV string and parse a CSV string into fields.
+
+The module accepts either strings or files as input and can utilize any
+user-specified characters as delimiters, separators, and escapes so it is
+perhaps better called ASV (anything separated values) rather than just CSV.
+
+%prep
+%setup -q -n Text-CSV-%{version}
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor NO_PACKLIST=1
+make %{?_smp_mflags}
+
+%check
+make test TEST_VERBOSE=1
+
+%install
+make pure_install DESTDIR=%{buildroot}
+%{_fixperms} %{buildroot}
+
+%files
+%doc Changes README.md
+%{perl_vendorlib}/*
+%{_mandir}/man3/*.3*
+
+%changelog
+* Thu Jun 30 2022 misaka00251 <misaka00251@misakanet.cn> - 2.01-1
+- Init package (Thanks to fedora team)