我们如何在Perl中创建一个唯一的Id

我想创建一个UniqueId.有没有一个我可以调用的功能,这样每当我使用它会给我一个新的Id,总是有一个不同的价值？

解决方法

你也可以使用更好的方法

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;
}

从这里你可以了解到Link