Git Bash环境下用perl脚本获取uuid值

爱读庄子的码农2023-12-04 10:53

在Linux环境下，比如在ubuntu就直接有uuidgen命令直接获取uuid值。在Windows环境下常用的git bash中没有对应的命令，略有不便。这里用脚本写一个uuidgen，模拟Linux环境下的uuidgen命令。

perl 复制代码

#! /usr/bin/perl
use v5.14;
use Win32;

sub uuidGen {
	return Win32::GuidGen() =~ s/[{}]//rg;
}

say uuidGen();

脚本命名为uuidgen，放在 git bash home目录下的bin子目录。然后直接输入uuidgen就能获取了，和ubuntu环境下使用一样方便。