Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

cbhistory

by pfaut (Priest)
on Dec 15, 2002 at 18:08 UTC ( [id://220030] : sourcecode . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    # table definition
    CREATE TABLE "chatter" (
    ...
        "message" text,
        Constraint "chatter_pkey" Primary Key ("chatterbox", "messagetime"
    +)
    );
    
  2. or download this
    #cbhistory.pl
    #!/usr/bin/perl -w
    ...
        my ($expat, $name) = @_;
        undef($expat->{mark});  # after the tag close, we wait for the nex
    +t one
    }
    
  3. or download this
    #cbhistory.cgi
    #!/usr/bin/perl -w
    ...
    __DATA__
    http://sourceforge.net/projects/jchatter/    Java Chatterbox project p
    +age on SourceForge
    jchatter.diff    Patch to Java Chatterbox to allow selection of a chat
    +terbox on the command line