my first poem, be kind.#!/usr/bin/perl while (my $friends and $neighbours) { use C; $i -> warn "#0 0x4053bfd7 in malloc () from /lib/libc.so.6\n". "#1 0x4053d415 in calloc () from /lib/libc.so.6\n". "#2 0x404aa45f in g_malloc0 () from /usr/lib/libglib-1.2.so.0\n"; $friends -> segfault(frequency => 'repeatedly'); $neighbours -> bang( appendage => 'head', target => 'wall', frequency => 'repeatedly'); $i -> chuckle && $i -> code (duration => 'all night long'); } use perl || segfault;
--
transcending "coolness" is what makes us cool.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: use perl segfault
by bladx (Chaplain) on Feb 21, 2001 at 21:21 UTC |