File perl-Getopt-Std-Strict.spec of Package perl-Getopt-Std-Strict

Overview Repositories Revisions Requests Users Attributes Meta

File perl-Getopt-Std-Strict.spec of Package perl-Getopt-Std-Strict

#
# spec file for package perl-Getopt-Std-Strict
#
# Copyright (c) 2012 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-Getopt-Std-Strict
Version:        1.01
Release:        0
%define cpan_name Getopt-Std-Strict
Summary:        Getopt::Std::Strict Perl module
License:        CHECK(GPL-1.0+ or Artistic-1.0)
Group:          Development/Libraries/Perl
Url:            http://search.cpan.org/dist/Getopt-Std-Strict/
Source:         Getopt-Std-Strict-1.01.tar.gz
BuildArch:      noarch
BuildRoot:      %{_tmppath}/%{name}-%{version}-build
BuildRequires:  perl
BuildRequires:  perl-macros
BuildRequires:  perl(Test::Simple) >= 0.74
#BuildRequires: perl(Getopt::Std::Strict)
Requires:       perl(Test::Simple) >= 0.74
%{perl_requires}

%description
Getopt::Std is nice but it could be even easier to use. This is how I would
like Getopt::Std to behave.

Two main concepts are strengthened here, on top of Getopt::Std.

1) Variables are created even under use strict
   2) Your option specs are passed at compile time.

The first import string to use is what you would send to Getopt::Std. If
you have an option flag 'g' and a paramater 'r' taking an argument, the
usage would be..

use strict;
   use Getopt::Std::Strict 'gr:';

$opt_g;

This makes available throughout your program the variables $opt_g and
$opt_r, as well as the hash %OPT, which contains $OPT{g} and $OPT{r}.

Compare that with the alternative..

use strict;
   use Getopt::Std;

my %o;

getopts('gr:', \%o);

$o->{g};

%prep
%setup -q -n %{cpan_name}-%{version}

%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
%{__make} %{?_smp_mflags}

%check
%{__make} test

%install
%perl_make_install
%perl_process_packlist
%perl_gen_filelist

%files -f %{name}.files
%defattr(-,root,root,755)

%changelog

Places

File perl-Getopt-Std-Strict.spec of Package perl-Getopt-Std-Strict

Places