[Perl] IRC Bot - Miodek
Dodano: 2008-10-10
W sumie to mój pierwszy sensowny skrypt w PERLu. Pomysł narodził się na ircu, przy popełnianych błędach ortograficznych przez userów. Bardziej pisałem go dla nauki PERLa niż samej funkcjonalności - raczej z niego nie będę korzystał.
Krótki opis funkcji:
- !add złe słowo => dobre słowo
Dodaje do bazy (a raczej pliku tekstowego o nazwie badwords.txt) niepoprawne słowo oraz jego dobry odpowiednik. (np. jusz => już). Dostęp do dodawania nowych wpisów mają tylko użytkownicy wpisani do bazy users.txt oraz muszą być zalogowani u NickServa (sprawdza poleceniem status nick stan zalogowania) - Sprawdza i ewentualnie poprawia niepoprawne wyrazy - wiedzę pobiera z pliku tekstowego
W przyszłości (o ile jeszcze będę zajmował się tym skryptem) zamierzam dodać parę funkcji m.in.:
- Podział userów na klasy (user/redaktor/administrator)
- Możliwość dodawania nowych użytkowników prosto z irca (aktualnie trzeba dodawać ręcznie w pliku tekstowym)
- Dopisać kilka prostych (albo i nieprostych) gier