Net::Goofey(3)

NAME
Net::Goofey - Communicate with a Goofey server

SYNOPSIS
   use Net::Goofey;

   $Goofey = Net::Goofey->new();
   $Goofey->signon();

DESCRIPTION
"Net::Goofey" is a class implementing a simple Goofey client in Perl.

CONSTRUCTOR

new ( [ USERNAME [, PASSWORD [, HOST [, PORT ] ] ] ])
    This is the constructor for a new Goofey object.

    "USERNAME" defaults, in order, to the environment variables "GOOFEYUSER", "USER" then "LOGNAME".

    "PASSWORD" defaults to the contents of the file "$HOME/.goofeypw".

    "HOST" and "PORT" refer to the remote host to which a Goofey connection is required.

    The constructor returns the open socket, or "undef" if an error has been encountered.

FUNCTIONS

signon ( );
    Register this client as the resident one.

send ( USERNAME, MESSAGE );
    Send a message to a goofey user (Will clients handle their own iteration for multi-user messages, or should we? For now I'm assuming that they will do it.)

unsend ( USERNAME );
    Delete your last message to USERNAME, provided (of course) they haven't read it.

register ([COMMAND]);
    Register for goofey.

    Valid commands:
       create Register new user
       sendpw Request your existing password be emailed to you
       alias <name> Register this machine as an alias
       request <name> Request another goofey name to alias current one

who ([USERNAME]);
    List that user's finger information.

list ([USERNAME]);
    List the locations and idle times of user. If user is empty then all users are listed, but their idle times are not queried: the last obtained idle time is printed. Users those idle times are more than 1 hour are not listed.

quiet ();
    Sets you quiet. The server will then keep your messages until you unquiet. This mode lets through messages from anybody on your unquiet alias, though.

quietall ();
    Sets you quiet to everybody.

    Repeats certain messages

unquiet ();
    Sets you unquiet.

killclient ();
    Sets you unquiet.

listen ( );
    Listens for a command from the Goofey server. If we don't already have an open port to them, opens it.

version ( );
    Returns version information.

AUTHOR
Bek Oberin <bekj@netizen.com.au>

CREDITS
Kirrily Robert <skud@netizen.com.au>

COPYRIGHT
Copyright (c) 1998 Bek Oberin. All rights reserved.

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

POD ERRORS
Hey! The above document had some coding errors, which are explained below:

Around line 75:
    '=item' outside of any '=over'

Around line 139:
    You forgot a '=back' before '=head1'

Around line 141:
    '=item' outside of any '=over'

Around line 279:
    =pod directives shouldn't be over one line long! Ignoring all 2 lines of content

Around line 487:
    You forgot a '=back' before '=head1'