README
------
NAME
Net::ICQ::On - ICQ Online Tester
SYNOPSIS
use Net::ICQ::On;
my $Online=Net::ICQ::On->Test();
my $Online=Net::ICQ::On->Test(204913808);
print "My ICQ number is ";
if ($Online==1) { print "204913808.\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.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.