#!/usr/bin/perl
# cpanel - sendicq                                Copyright(c) 2010 cPanel, Inc.
#                                                           All rights Reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

BEGIN { unshift @INC, '/usr/local/cpanel'; }

use Cpanel::iContact qw( );

my $message = join(' ',@ARGV);

Cpanel::iContact::sendicq(undef,$message);