in reply to Re: Taking argument via drag-drop to a perl script
in thread Taking argument via drag-drop to a perl script

Any idea what that cryptic hex (i assume) string is? Is it MS's way of telling us they are the high priests of computing?

If they were, a mere 42 would have been perfectly sufficient. But they botched that up: the tally is only 41 ...

sub sumit { my $sum = 0; map { $sum += $_ } split //, @_ ? $_[0] : $_; $sum } my @sums = map { sumit } map { sumit hex } split /\-/, '86C86720-42A0- +1069-A2E8-08002B30309D'; print sprintf "%s\n", join '+', @sums;
7+10+7+7+10

bw, bliako

Replies are listed 'Best First'.
Re^3: Taking argument via drag-drop to a perl script
by kschwab (Vicar) on Dec 04, 2018 at 11:59 UTC
Re^3: Taking argument via drag-drop to a perl script
by pryrt (Abbot) on Dec 04, 2018 at 14:44 UTC

    You've never seen UUID/GUID before? You can generate them from Perl, using modules like Data::GUID or Win32API::GUID. A Windows registry is chock-full of UUID, which are used for uniquely identifying handlers, objects, and the like. And they weren't even invented or standardized by Microsoft: there are equivalent standards among various bodies, including the Open Software Foundation, ISO/IEC, and IETF.

      Thanks for the info. No, my mind did not go there at all.