perl - 我们如何在Perl中创建唯一ID

Question

我想创建一个 UniqueId 。我是否可以调用一个函数，以便每次使用该函数时，都会给我一个新ID，且始终具有不同的值？

Answer 1

您也可以使用此更好的方法

use UUID::Generator::PurePerl;

sub create_search_id {
    my $this =shift;
    my $args=shift;
    my $ug = UUID::Generator::PurePerl->new();
    my $uuid1 = $ug->generate_v1();
    return $uuid1;
}

从这里您可以了解 UUID::Generator::PurePerl