From: Dov Grobgeld <dov@menora.weizmann.ac.il>
Subject: A Perl X11 bitmap
Date: Wed, 25 Nov 1992 10:16:06 GMT
Organization: The Internet
Lines: 56

My mail program (xwafemail) shows a small x11 bitmap in the corner if a
bitmap file exists with a name corresponding to the sender of mail. Since
I read comp.lang.perl as through the perl-digest, I wanted to have
an icon for the Perl digest. So I hacked together one.

I then thought that perhaps someone else would like to have it too,
so here it is: Perl-Users-Request.xbm. (My appologies to those who
think that the icon should show a camel...)

#define Perl_Users_Request_width 50
#define Perl_Users_Request_height 50
#define Perl_Users_Request_x_hot -1
#define Perl_Users_Request_y_hot -1
static char Perl_Users_Request_bits[] = {
   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
   0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x0f, 0x00,
   0x00, 0x00, 0x00, 0x00, 0xc8, 0x39, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0,
   0x71, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x70, 0x00, 0x00, 0x00, 0x00,
   0x00, 0xe0, 0x70, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x70, 0x00, 0x00,
   0x00, 0x00, 0x00, 0x70, 0x30, 0x00, 0x00, 0x00, 0x00, 0x00, 0x70, 0x1c,
   0x00, 0x80, 0x0f, 0x00, 0x00, 0xf0, 0x07, 0x00, 0xe0, 0x3f, 0x00, 0x00,
   0x78, 0x00, 0x00, 0x48, 0xfe, 0x00, 0x00, 0x38, 0x00, 0x00, 0x48, 0xfe,
   0x00, 0x00, 0xb8, 0xff, 0x00, 0xfc, 0xff, 0x01, 0x00, 0x38, 0x87, 0x01,
   0x4c, 0xfe, 0x01, 0x00, 0x9d, 0x07, 0x01, 0x4e, 0xfe, 0x03, 0x00, 0x9e,
   0x03, 0x00, 0xfe, 0xff, 0x03, 0x00, 0x80, 0x03, 0x00, 0xfe, 0xff, 0x03,
   0x00, 0x80, 0x03, 0x00, 0xfe, 0xff, 0x03, 0x00, 0xc0, 0x3f, 0x00, 0xfe,
   0xff, 0x03, 0x00, 0xc0, 0x01, 0x00, 0xfc, 0xff, 0x01, 0x00, 0xc0, 0x01,
   0x00, 0xfc, 0xff, 0x01, 0x00, 0xe0, 0x00, 0x00, 0xf8, 0xff, 0x00, 0x00,
   0xe0, 0xe0, 0x1f, 0xf8, 0xff, 0x00, 0x00, 0xe0, 0x90, 0x73, 0xf0, 0x3f,
   0x00, 0x00, 0xe0, 0xc0, 0xe3, 0xc0, 0x0f, 0x00, 0x00, 0x70, 0xd8, 0xe1,
   0x00, 0x00, 0x00, 0x00, 0xf8, 0xcf, 0xe1, 0x00, 0x00, 0x00, 0x00, 0x00,
   0xc0, 0xe1, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x60, 0x00, 0x00, 0x00,
   0x00, 0x00, 0xe0, 0x38, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x0f, 0x00,
   0x00, 0x00, 0x00, 0x00, 0xf0, 0x07, 0x00, 0x00, 0x00, 0x00, 0x00, 0x70,
   0xc7, 0x03, 0x00, 0x00, 0x00, 0x00, 0x70, 0xaf, 0x03, 0x00, 0x00, 0x00,
   0x00, 0x70, 0x8e, 0x03, 0x00, 0x00, 0x00, 0x00, 0x38, 0xce, 0x01, 0x00,
   0x00, 0x00, 0x00, 0x1c, 0xd8, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0xc0,
   0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00,
   0x00, 0xe0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, 0x00, 0x00, 0x00,
   0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x70, 0x00,
   0x00, 0x00, 0x00, 0x00, 0x00, 0x70, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
   0x70, 0x20, 0x00, 0x00, 0x00, 0x00, 0x00, 0x38, 0x30, 0x00, 0x00, 0x00,
   0x00, 0x00, 0xfc, 0x0f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
   0x00, 0x00};

Regards,

     Dov
--
                                                        ___   ___
                                                      /  o  \   o \
Dov Grobgeld                                         ( o  o  ) o   |
The Weizmann Institute of Science, Israel             \  o  /o  o /
"Where the tree of wisdom carries oranges"              | |   | |
                                                       _| |_ _| |_