Text::Emoticon::MSN 0.04

Text::Emoticon::MSN is a Perl module with emoticon filter of MSN Messenger.

SYNOPSIS

use Text::Emoticon::MSN;

my $emoticon = Text::Emoticon::MSN->new(
imgbase => "http://example.com/emo",
);

my $text = "Yet Another Perl Hacker ;-)";
print $emoticon->filter($text);

# it prints
# Yet Another Perl Hacker

Text::Emoticon::MSN is a text filter that replaces text emoticons like ":-)", ";-P", etc. to the icons of MSN Messenger, detailed in http://messenger.msn.com/Resource/Emoticons.aspx

METHODS

new

$emoticon = Text::Emoticon::MSN->new(
imgbase => "http://yourhost.example.com/images/emoticons",
xhtml => 1,
class => "emoticon",
);

Constructs new Text::Emoticon::MSN object. It accepts two options:

imgbase

Base URL where icon gif files are located. It defaults to "http://messenger.msn.com/Resource/emoticons" (the MSN site) but I dont recommend that, as theres a possibility MSN will ban your site.

xhtml

Whether it uses XHTML style img tags. It defaults to 1.

class

CSS class used in img tags. It defaults to nothing.

$emoticon = Text::Emoticon::MSN->new(class => "emo");

will print:

< img src="blah.gif" class="emo" / >

strict

Whether it will disable smileys with space in them. defaults to 0.

filter

$filtered_text = $emoticon->filter($text);

Filters emoticons in text and returns img tagged text (HTML).