my ($UUID) = `ioreg -d2 -c IOPlatformExpertDevice` =~ /^.*\bIOPlatformUUID\b.*"([^"]+)"\s*$/m or print "failed to parse ioreg";