Front page | perl.perl5.porters |
Postings from November 2003
Guess what this does...
Thread Next
From:
Brian Ingerson
Date:
November 7, 2003 21:19
Subject:
Guess what this does...
Message ID:
20031108051847.GC19610@ttul.org
'segfault' . Segfault->new('segfault');
package Segfault;
use overload '""' => sub { 'segfault' . shift };
sub new { bless {segmentation => 'fault'}, $_[0] }
Cheers, Brian
Thread Next
-
Guess what this does...
by Brian Ingerson