saluton allo moin aloha namaste shalom ciào ciao servus
salve ave merhaba witaj hei hola selam sawubona
geodemorgen hoi καλημέρα/,
saluton allo moin aloha namaste shalom ciào ciao servus
salve ave merhaba witaj hei hola selam sawubona
geodemorgen hoi καλημέρα/,
- "what's up", 'que tal', 'こんにちは', '你好', 'ni hao',
+ 'what\'s up', 'que tal', 'こんにちは', '你好', 'ni hao',
'добро јутро', 'γεια σας', 'bom dia', 'hyvää huomenta'],
@_
};
'добро јутро', 'γεια σας', 'bom dia', 'hyvää huomenta'],
@_
};
my $message = NFC decode 'UTF-8', $$rmessage;
my @hello = @{$self->{greetings}};
my $message = NFC decode 'UTF-8', $$rmessage;
my @hello = @{$self->{greetings}};
my $randhello = encode 'UTF-8', $hello[int rand $#hello];
$irc->yield(privmsg => $$rchannels->[0] => "$randhello, $nick") if $match;
PCI_EAT_NONE
my $randhello = encode 'UTF-8', $hello[int rand $#hello];
$irc->yield(privmsg => $$rchannels->[0] => "$randhello, $nick") if $match;
PCI_EAT_NONE