The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
WWW-RaptureReady-0.1
River stage zero No dependents
++
/ WWW::RaptureReady

NAME

WWW::RaptureReady - Interface to Rapture Ready's Rapture Index

VERSION

This document describes WWW::RaptureReady version 0.1.

SYNOPSIS

  use WWW::RaptureReady;
  my $rr = WWW::RaptureReady->new;
  print "URL:           ", $rr->url,     "\n",
        "Current Index: ", $rr->index,   "\n",
        "Index Change:  ", $rr->change,  "\n",
        "Last Updated:  ", $rr->updated, "\n";

DESCRIPTION

This module provides an interface to the Rapture Ready Rapture Index. Rapture Ready's description of the index:

  The Rapture Index has two functions: one is to factor together a
  number of related end time components into a cohesive indicator,
  and the other is to standardize those components to eliminate the
  wide variance that currently exists with prophecy reporting.

  The Rapture Index is by no means meant to predict the rapture,
  however, the index is designed to measure the type of activity
  that could act as a precursor to the rapture.

  You could say the Rapture index is a Dow Jones Industrial Average
  of end time activity, but I think it would be better if you viewed
  it as prophetic speedometer. The higher the number, the faster
  we're moving towards the occurrence of pre-tribulation rapture.

The rapture index is the "prophetic speedometer of end-time activity".

INTERFACE

new()

Creates and returns a new WWW::RaptureReady object.

  my $rr = WWW::RaptureReady->new

url()

Returns the configured URL for retrieving the Rapture Index.

  my $url = $rr->url

url($url)

Sets the URL to be used for retrieving the Rapture Index.

  $rr->url("http://example.com/rapture.html")

fetch()

Fetches the Rapture Index HTML from the configured URL.

  $rr->fetch

index()

Returns the current index level. Calls fetch() if index not already retrieved.

  my $index = $rr->index

change()

Returns the change in the index. Calls fetch() if index not already retrieved.

  my $change = $rr->change

updated()

Returns when the index was last updated. Calls fetch() if index not already retrieved.

  my $updated = $rr->updated

SEE ALSO

Perl, LWP::UserAgent, http://www.raptureready.com/rap2.html

AUTHOR

blair christensen., <blair@devclue.com>

<http://devclue.com/blog/code/WWW::RaptureReady/>

COPYRIGHT AND LICENSE

Copyright 2005 by blair christensen.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

DISCLAIMER OF WARRANTY

BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR, OR CORRECTION.

IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENCE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.