#include "windows.h"
	#include <stdio.h>
	#include <tchar.h>
	#include "perl.h"
	#include "EXTERN.h"

SV* Utl_Stats()
{
	HV* infoHV = newHV();
	SV* info   = newSV(0);
	
		hv_store(infoHV, "name1",   5, newSVnv(1), 0);
		hv_store(infoHV, "name2",    5, newSVnv(2), 0);
		hv_store(infoHV, "name3",   5, newSVnv(3), 0);
		
    sv_setsv(info, sv_2mortal(newRV_noinc((SV*) infoHV)));
	return info;
}