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

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


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

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

say uuidGen();


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

在这里插入图片描述

你可能感兴趣的:(perl,git,bash,perl)