File perl-LWP-Online.spec of Package perl-LWP-Online

Overview Repositories Revisions Requests Users Attributes Meta

File perl-LWP-Online.spec of Package perl-LWP-Online (Revision 7bfe0fc6e035e7b11e37acbe07e6d167)

Currently displaying revision 7bfe0fc6e035e7b11e37acbe07e6d167 , Show latest

#
# spec file for package perl-LWP-Online
#
# Copyright (c) 2011 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-LWP-Online
Version:        1.08
Release:        1
License:        GPL-1.0+ or Artistic-1.0
%define cpan_name LWP-Online
Summary:        Does your process have access to the web
Url:            http://search.cpan.org/dist/LWP-Online/
Group:          Development/Libraries/Perl
Source:         http://www.cpan.org/authors/id/A/AD/ADAMK/LWP-Online-%{version}.tar.gz
BuildArch:      noarch
BuildRoot:      %{_tmppath}/%{name}-%{version}-build
BuildRequires:  perl
BuildRequires:  perl-macros
BuildRequires:  perl(ExtUtils::MakeMaker)
BuildRequires:  perl(LWP::Simple)
BuildRequires:  perl(Test::More) >= 0.42
BuildRequires:  perl(URI)
Requires:       perl(LWP::Simple)
Requires:       perl(URI)
%{perl_requires}

%description
This module attempts to answer, as accurately as it can, one of the
nastiest technical questions there is.

*Am I on the internet?*

The answer is useful in a wide range of decisions. For example...

_Should my test scripts run the online portion of the tests or just skip
them?_

_Do I try to fetch fresh data from the server?_

_If my request to the server breaks, is it because I'm offline, or because
the server is offline?_

And so on, and so forth.

But a host of networking and security issues make this problem very
difficult. There are firewalls, proxies (both well behaved and badly
behaved). We might not have DNS. We might not have a network card at all!

You might have network access, but only to a for-money wireless network
that responds to ever HTTP request with a page asking you to enter your
credit card details for paid access. Which means you don't "REALLY" have
access.

The mere nature of the question makes it practically unsolvable.

But with the answer being so useful, and the only other alternative being
to ask the user "duh... are you online?" (when you might not have a user at
all) it's my gut feeling that it is worthwhile at least making an attempt
to solve the problem, if only in a limited way.

%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

%clean
%{__rm} -rf %{buildroot}

%files -f %{name}.files
%defattr(-,root,root,755)
%doc %attr(644,-,-) Changes LICENSE README

%changelog

Places

File perl-LWP-Online.spec of Package perl-LWP-Online (Revision 7bfe0fc6e035e7b11e37acbe07e6d167)

Places