# Reunión social del 9 de Junio de 2011

<pre lang="Perl">

use 5.14.0;

use DateTime;

use URI;

use utf8;

our $reunión = {

cuando => DateTime->new(

day => 9,

month => 6,

year => 2011,

hour => 20,

minute => 00,

),

donde => {

nombre => undef,

dirección => undef,

url => URI->new(''),

},

quienes => [ qw/ francisco deibyz roberto diegok / ],

quienes => [ qw/ fran deibyz roberto diegok / ],

};

</pre>