$devslashneil = Monk->new(
    name      => 'Neil Archibald',
    nicknames => [ qw/nemo orokusaki noel devslashneil synack/ ],
    age       => 20,
    homepage  => URI->new('http://slampt.net/~neil'),
    email     => Mail::Address->new   
                ('Neil', 'neil' . '@' . 'nerdc0re.com'),
    );

-----BEGIN GEEK CODE BLOCK------
Version: 3.1
GCS d- s: a-- C+++ UL++++ P++++ L+++ E--- W+++ N+ o K- w O- M-- V PS+++ PE Y PGPt+ 5++ X++ R++ tv+ b+++ DI++ D++ G e+ h- r- y++ :w
------END GEEK CODE BLOCK------