#!/usr/bin/env perl
use strict;
use FindBin;
use lib "$FindBin::Bin/../lib";
my $im = WebService::ImKayac::Simple->new(
type => 'password',
user => '__USER_NAME__',
password => '__PASSWORD__',
);
$im->send('Hello!');