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. Example use: in xhtml, see above example, to display ICQ number in green if online or default colour if offline. UPDATED 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.3 (20060321) 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 Windows Software and Adult Frequency (http://adultfrequencysoft.com), Adult Windows Software. This Perl module is free software and may be freely redistributed unchanged.