gitpan/UUID — pull request #1 by snakpak (2014-12-14 22:14:09+00:00)
Title: Added uuid()

Satisfies a common use case and benchmarks faster by ~15%...

Instead of:

use UUID ':all';
sub myuuid {
my ( $uuid, $str );
generate_uuid( $uuid );
unparse_uuid( $str );
return $str;
}
my $uuid_str = myuuid();

Replace with:

use UUID 'uuid';
my $uuid_str = uuid();

--