diff --git a/.cvsignore b/.cvsignore
index e69de29..f0a2b08 100644
--- a/.cvsignore
+++ b/.cvsignore
@@ -0,0 +1 @@
+Text-CharWidth-0.04.tar.gz
diff --git a/perl-Text-CharWidth.spec b/perl-Text-CharWidth.spec
new file mode 100644
index 0000000..c661297
--- /dev/null
+++ b/perl-Text-CharWidth.spec
@@ -0,0 +1,52 @@
+Summary: Get number of occupied columns of a string on terminal
+Name: perl-Text-CharWidth
+Version: 0.04
+Release: 2%{?dist}
+License: GPL or Artistic
+Group: Development/Libraries
+URL: http://search.cpan.org/dist/Text-CharWidth/
+Source0: http://search.cpan.org/CPAN/authors/id/K/KU/KUBOTA/Text-CharWidth-%{version}.tar.gz
+BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root
+BuildRequires: perl
+Requires: perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
+
+%description
+This is a module to provide equivalent feature as wcwidth(3) and
+wcswidth(3).  This also provides mblen(3) equivalent subroutine.
+
+%prep
+%setup -q -n Text-CharWidth-%{version}
+
+%build
+perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"
+make
+
+%install
+rm -rf %{buildroot}
+make install DESTDIR=%{buildroot}
+find %{buildroot} -type f \( -name .packlist -or -name perllocal.pod \
+  -or \( -name '*.bs' -a -empty \) \) -exec rm -f {} \;
+find %{buildroot} -depth -type d -exec rmdir {} \;
+chmod -R u+w %{buildroot}
+
+%check || :
+make test
+
+%clean
+rm -rf %{buildroot}
+
+
+%files
+%defattr(-,root,root,-)
+%doc README Changes
+%{perl_vendorarch}/Text
+%{perl_vendorarch}/auto/Text
+%{_mandir}/man3/Text::CharWidth.3pm*
+
+%changelog
+* Sat Dec 30 2006 Axel Thimm <Axel.Thimm@ATrpms.net> - 0.04-2
+- Add ownership of some perl folders.
+
+* Thu Dec 28 2006 Axel Thimm <Axel.Thimm@ATrpms.net> - 0.04-1
+- Initial build.
+
diff --git a/sources b/sources
index e69de29..2fffbe9 100644
--- a/sources
+++ b/sources
@@ -0,0 +1 @@
+37a723df0580c0758c0ee67b37336c15  Text-CharWidth-0.04.tar.gz