Name: perl-constant Version: 1.27 Release: 2%{?dist} Summary: Perl pragma to declare constants License: GPL+ or Artistic Group: Development/Libraries URL: http://search.cpan.org/dist/constant/ Source0: http://www.cpan.org/authors/id/S/SA/SAPER/constant-%{version}.tar.gz BuildArch: noarch BuildRequires: perl BuildRequires: perl(Module::Build) BuildRequires: perl(strict) # Run-time: BuildRequires: perl(Carp) BuildRequires: perl(vars) BuildRequires: perl(warnings::register) # Tests: BuildRequires: perl(Test::More) BuildRequires: perl(utf8) BuildRequires: perl(warnings) # Optional tests: BuildRequires: perl(Test::Pod) >= 1.14 BuildRequires: perl(Test::Pod::Coverage) >= 1.04 Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) Requires: perl(Carp) %description This pragma allows you to declare constants at compile-time: use constant PI => 4 * atan2(1, 1); When you declare a constant such as "PI" using the method shown above, each machine your script runs upon can have as many digits of accuracy as it can use. Also, your program will be easier to read, more likely to be maintained (and maintained correctly), and far less likely to send a space probe to the wrong planet because nobody noticed the one equation in which you wrote 3.14195. When a constant is used in an expression, Perl replaces it with its value at compile time, and may then optimize the expression further. In particular, any code in an "if (CONSTANT)" block will be optimized away if the constant is false. %prep %setup -q -n constant-%{version} %build perl Build.PL installdirs=vendor ./Build %install ./Build install destdir=$RPM_BUILD_ROOT create_packlist=0 %{_fixperms} $RPM_BUILD_ROOT/* %check ./Build test %files %doc Changes eg README %{perl_vendorlib}/* %{_mandir}/man3/* %changelog * Fri Dec 27 2013 Daniel Mach - 1.27-2 - Mass rebuild 2013-12-27 * Thu Mar 21 2013 Petr Pisar 1.27-1 - Specfile autogenerated by cpanspec 1.78.