Select Code to Download

15:57 >perl -MData::Dumper -wE "my %h = (a => 7, b => 13); $h{b} = 42;
+ print Dumper(\%h);"
$VAR1 = {
...
        };

15:57 >

$queue_changes{$event_id} = %type;

$queue_changes{$event_id} = \%type;

$event_id = int(rand(25000));