initial package

OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Algorithm-GenerateSequence?expand=0&rev=1

perl-Algorithm-GenerateSequence.spec

@@ -0,0 +1,76 @@
+#
+# spec file for package perl-Algorithm-GenerateSequence (Version 0.02)
+#
+# Copyright (c) 2010 SUSE LINUX Products GmbH, Nuernberg, Germany.
+#
+# All modifications and additions to the file contributed by third parties
+# remain the property of their copyright owners, unless otherwise agreed
+# upon. The license for this file, and modifications and additions to the
+# file, is the same license as for the pristine package itself (unless the
+# license for the pristine package is not an Open Source License, in which
+# case the license is the MIT License). An "Open Source License" is a
+# license that conforms to the Open Source Definition (Version 1.9)
+# published by the Open Source Initiative.
+
+# Please submit bugfixes or comments via http://bugs.opensuse.org/
+#
+
+Name:           perl-Algorithm-GenerateSequence
+Version:        0.02
+Release:        1
+License:        GPL+ or Artistic
+%define cpan_name Algorithm-GenerateSequence
+Summary:        a sequence generator
+Url:            http://search.cpan.org/dist/Algorithm-GenerateSequence/
+Group:          Development/Libraries/Perl
+Source:         http://www.cpan.org/authors/id/R/RC/RCLAMP/%{cpan_name}-%{version}.tar.gz
+BuildArch:      noarch
+BuildRoot:      %{_tmppath}/%{name}-%{version}-build
+BuildRequires:  perl
+BuildRequires:  perl(Module::Build)
+BuildRequires:  perl-macros
+BuildRequires:  perl(Module::Build)
+BuildRequires:  perl(Test::More)
+%{perl_requires}
+
+%description
+Algorithm::GenerateSequence provides an iterator interface to a sequence
+you define in terms of the symbols to use in each position.
+
+You may use a different amount of symbols in each position and the module
+will iterate over them correctly. This might be useful in identifying all
+the cards in a deck:
+
+ my $deck = Algorithm::GenerateSequence->new(
+     [qw( Heart Diamond Spade Club )],
+     [qw( A 2 3 4 5 6 7 8 9 10 J Q K )],
+ );
+
+Or for a range of addresses to scan:
+
+ my $scan = Algorithm::GenerateSequence->new(
+     [192], [168], [0..254], [1]
+ );
+
+%prep
+%setup -q -n %{cpan_name}-%{version}
+
+%build
+%{__perl} Build.PL installdirs=vendor
+./Build build flags=%{?_smp_mflags}
+
+%check
+./Build test
+
+%install
+./Build install destdir=%{buildroot} create_packlist=0
+%perl_gen_filelist
+
+%clean
+%{__rm} -rf %{buildroot}
+
+%files -f %{name}.files
+%defattr(-,root,root,755)
+%doc %attr(644,-,-) bench_call Changes README
+
+%changelog