README
------

NAME

Net::ICQ::On - ICQ Online Tester

SYNOPSIS

  use Net::ICQ::On;

  my $Online=Net::ICQ::On->Test(<ICQ No./>);

  my $Online=Net::ICQ::On->Test(204913808);
  print "My ICQ number is ";
  if ($Online==1) { print "<span style=\"color: green;\">204913808
</span>.\n"; }
  else { print "204913808.\n"; }

DESCRIPTION

This module checks the online state of any ICQ user and returns 1 for
online or 0 for offline.  It downloads the smallest ICQ online gif and
analyses it to determine online state.

It was designed to replace the trademark large ICQ flower GIF from my
website with the stated outcome of the online state.

Example uses:  In xhtml, see above example, to display ICQ number in
green if online or default colour if offline.  As a gateway for Live
Support.  To redirect email link to ICQ message if online.

UPDATED

Version 1.10.6 (20060407): Minor documentation update.
Version 1.10.5 (20060404): Minor documentation update.
Version 1.10.4 (20060324): Minor code update.
Version 1.10.3 (20060321): Updated distribution.
Version 1.10.2 (20060320): Changed name of function.  Minor code
updates.  Updated documentation.
Version 1.9.4: Changed to HTTP::Request::Common for simplicity and
optimisation.

VERSION

v1.10.5 (20060404)

COPYRIGHT

Code is copyright (c)2005-6 Jerome McKean, Dream Frequency.  ICQ is
copyright (c)1998-2006 ICQ Inc..

AUTHOR INFORMATION

Net::ICQ::On was created by Jerome McKean (jerome@dreamfrequency.com),
owner of Dream Frequency (http://dreamfrequency.com), Useful 99 Windows
Software and Adult Frequency (http://adultfrequencysoft.com), Adult
Windows Software.  This Perl module is free software and may be freely
redistributed unchanged.
