my $yahoo = Net::YMSG->new(
		pre_login_url => 'http://msg.edit.yahoo.com/config/',
		hostname => 'cs.yahoo.com',
		id       => '$config->get("login_name")',
		password => '$config->get("login_passwd")',
		);
$yahoo->login or die "Can't login Yahoo!Messenger";
$yahoo->send('abcd', 'Hello World!')