Help for this page

Select Code to Download


  1. or download this
        # Fork it into two process's
    my $kidpid;
...
        my $line = <$STDIN>;
        $scrolledText->insert('end',$line);
                });
  2. or download this
    drew@Phantom:~$ perl irc.pl
>> NICK k0rn
...
perl: ../../src/xcb_io.c:242: process_responses: Assertion `(((long) (
+dpy->last_request_read) - (long) (dpy->request)) <= 0)' failed.
perl: ../../src/xcb_io.c:242: process_responses: Assertion `(((long) (
+dpy->last_request_read) - (long) (dpy->request)) <= 0)' failed.
Aborted