--- /dev/null
+#
+# Conditional build:
+%bcond_without tests # do not perform "make test"
+#
+%include /usr/lib/rpm/macros.perl
+%define pdir Device
+%define pnam USB
+Summary: Device::USB - Use libusb to access USB devices
+Name: perl-Device-USB
+Version: 0.27
+Release: 1
+# same as perl
+License: GPL v1+ or Artistic
+Group: Development/Languages/Perl
+Source0: http://search.cpan.org/CPAN/authors/id/G/GW/GWADEJ/Device-USB-%{version}.tar.gz
+# Source0-md5: bc341793a6ec5ffcce4380cbee6e35ba
+URL: http://search.cpan.org/dist/Device-USB/
+BuildRequires: libusb-devel
+BuildRequires: perl-Inline
+BuildRequires: perl-Inline-C
+BuildRequires: perl-Parse-RecDescent
+BuildRequires: perl-devel >= 1:5.8.0
+BuildRequires: rpm-perlprov >= 4.1-13
+BuildArch: noarch
+BuildRoot: %{tmpdir}/%{name}-%{version}-root-%(id -u -n)
+
+%description
+This module provides a Perl interface to the C library libusb. This
+library supports a relatively full set of functionality to access a
+USB device. In addition to the libusb, functioality, Device::USB
+provides a few convenience features that are intended to produce a
+more Perl-ish interface.
+
+%prep
+%setup -q -n %{pdir}-%{pnam}-%{version}
+
+%build
+%{__perl} Makefile.PL \
+ INSTALLDIRS=vendor
+%{__make}
+
+%{?with_tests:%{__make} test}
+
+%install
+rm -rf $RPM_BUILD_ROOT
+
+%{__make} pure_install \
+ DESTDIR=$RPM_BUILD_ROOT
+
+%clean
+rm -rf $RPM_BUILD_ROOT
+
+%files
+%defattr(644,root,root,755)
+%doc Changes README
+%{perl_vendorarch}/Device/*.pm
+%{perl_vendorarch}/Device/USB
+%attr(755,root,root) %{perl_vendorarch}/Device/dump_usb.pl
+%dir %{perl_vendorarch}/auto/Device/USB
+%{perl_vendorarch}/auto/Device/USB/*.bs
+%attr(755,root,root) %{perl_vendorarch}/auto/Device/USB/*.so
+%{_mandir}/man3/*