my $self=bless $id, $class;

##</code><code>##

my $self=bless \$id, $class;

##</code><code>##

my $self = bless {id => $id},$class;

##</code><code>##

my $self = $handles[shift()->{id}];