The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

TB2::HasObjectID - a unique id in the current process

SYNOPSIS

    package My::Thing;

    use TB2::Mouse;
    with "TB2::HasObjectID";

    my $thing = My::Thing->new;
    my $id = $thing->object_id;

DESCRIPTION

Provides a method for generating unique ids for many TB2 objects.

Useful if, for example, an EventHandler posts its own events and doesn't want to process them twice.

object_id

    my $id = $thing->object_id;

Returns an identifier for this object unique to the running process. The identifier is fairly simple and easily predictable.