[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / UUIDMaker / Win32API / GUID.pm

package DBIx::Class::UUIDMaker::Win32API::GUID;
use base qw/DBIx::Class::UUIDMaker/;
use Win32API::GUID ();

sub as_string {
    return Win32API::GUID::CreateGuid();
};

1;
Commit	Line	Data
947acfd9	1	package DBIx::Class::UUIDMaker::Win32API::GUID;
	2	use base qw/DBIx::Class::UUIDMaker/;
	3	use Win32API::GUID ();
	4
	5	sub as_string {
	6	return Win32API::GUID::CreateGuid();
	7	};
	8
	9	1;