diff --git a/.cvsignore b/.cvsignore
index e69de29..e565229 100644
--- a/.cvsignore
+++ b/.cvsignore
@@ -0,0 +1 @@
+XML-Smart-1.6.9.tar.gz
diff --git a/import.log b/import.log
new file mode 100644
index 0000000..b0eb42a
--- /dev/null
+++ b/import.log
@@ -0,0 +1 @@
+perl-XML-Smart-1_6_9-1_el5:HEAD:perl-XML-Smart-1.6.9-1.el5.src.rpm:1213204936
diff --git a/perl-XML-Smart-1.6.9-nohttp.patch b/perl-XML-Smart-1.6.9-nohttp.patch
new file mode 100644
index 0000000..d7142b1
--- /dev/null
+++ b/perl-XML-Smart-1.6.9-nohttp.patch
@@ -0,0 +1,16 @@
+Do not ask interactive questions, nor fetch anything from the Internets.
+Lubomir Rintel (Good Data) <lubo.rintel@gooddata.com>
+
+diff -urp XML-Smart-1.6.9.orig/test.pl XML-Smart-1.6.9/test.pl
+--- XML-Smart-1.6.9.orig/test.pl	2004-09-01 20:39:28.000000000 +0200
++++ XML-Smart-1.6.9/test.pl	2008-06-03 11:36:45.000000000 +0200
+@@ -1251,7 +1251,8 @@ TEXT1 &amp; more
+   
+     my $url = 'http://www.perlmonks.org/index.pl?node_id=16046' ;
+ 
+-    my $opt = prompt("\nURL: $url\nDo you want to test XML::Smart with an URL?","n");
++    #my $opt = prompt("\nURL: $url\nDo you want to test XML::Smart with an URL?","n");
++    my $opt = 'no way, dude';
+     
+     if ( $opt =~ /^\s*(?:y|s)/si ) {
+       print "\nGetting URL... " ;
diff --git a/perl-XML-Smart.spec b/perl-XML-Smart.spec
new file mode 100644
index 0000000..7050507
--- /dev/null
+++ b/perl-XML-Smart.spec
@@ -0,0 +1,64 @@
+Name:           perl-XML-Smart
+Version:        1.6.9
+Release:        1%{?dist}
+Summary:        Implementation of XML parser and writer for Perl
+License:        GPL+ or Artistic
+Group:          Development/Libraries
+URL:            http://search.cpan.org/dist/XML-Smart/
+Source0:        http://www.cpan.org/authors/id/G/GM/GMPASSOS/XML-Smart-%{version}.tar.gz
+Patch0:         perl-XML-Smart-1.6.9-nohttp.patch
+BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
+BuildArch:      noarch
+BuildRequires:  perl(ExtUtils::MakeMaker)
+BuildRequires:  perl(Object::MultiType) >= 0.03
+BuildRequires:  dos2unix
+Requires:       perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
+
+
+%description
+This module uses tree of hashes and arrays as representation of XML data,
+which enables the programmer to access it easily, taking advantage of
+standard Perl language facilities.
+
+
+%prep
+%setup -q -n XML-Smart-%{version}
+%patch -p1 -b .nohttp
+
+
+%build
+dos2unix -q -k README Changes
+%{__perl} Makefile.PL INSTALLDIRS=vendor
+make %{?_smp_mflags}
+
+
+%install
+rm -rf $RPM_BUILD_ROOT
+
+make pure_install PERL_INSTALL_ROOT=$RPM_BUILD_ROOT
+
+find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \;
+find $RPM_BUILD_ROOT -depth -type d -exec rmdir {} 2>/dev/null \;
+
+%{_fixperms} $RPM_BUILD_ROOT/*
+
+
+%check
+make test
+
+
+%clean
+rm -rf $RPM_BUILD_ROOT
+
+
+%files
+%defattr(-,root,root,-)
+%doc Changes README
+%{perl_vendorlib}/*
+%{_mandir}/man3/*
+
+
+%changelog
+* Mon Jun 02 2008 Lubomir Rintel (Good Data) <lubo.rintel@gooddata.com> 1.6.9-1
+- Specfile autogenerated by cpanspec 1.75.
+- Skip the test that fetches an external file
diff --git a/sources b/sources
index e69de29..bb80805 100644
--- a/sources
+++ b/sources
@@ -0,0 +1 @@
+648309c0d613ddaca6f6b16e9f13c81d  XML-Smart-1.6.9.tar.gz