Gea-Suan Lin > BBS-UserInfo-Maple3 > BBS::UserInfo::Maple3

Download:
BBS-UserInfo-Maple3-0.01.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.01   Source  

NAME ^

BBS::UserInfo::Maple3 - Get user information of Maple3-style BBS

SYNOPSIS ^

    use BBS::UserInfo::Maple3;

    my $foo = BBS::UserInfo::Maple3->new(
            'debug' => 1,
            'port' => 23,
            'server' => 'deer.twbbs.org',
            'telnet' => '/usr/bin/telnet',
            'timeout' => 10
            );

    # connect to the server
    $bot->connect() or die('Unable to connect BBS');

    my $userdata = $bot->query('username');

    # print some data
    print($userdata->{'logintimes'});

FUNCTIONS ^

new()

Create a BBS::UserInfo::Maple3 object, there are some parameters that you can define:

    server => 'deer.twbbs.org'  # Necessary, server name
    port => 23                  # Optional, server port
    telnet => 'telnet'          # Optional, telnet program
    timeout => 10               # Optional, Expect timeout
    debug => 1                  # Optional, print debug information

connect()

Connect to the BBS server.

query()

Query user information and return a hash reference with:

AUTHOR ^

Gea-Suan Lin, <gslin at gslin.org>

COPYRIGHT & LICENSE ^

Copyright 2006 Gea-Suan Lin, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: