#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

MODULE=VLenArg PACKAGE=VLenArg

PROTOTYPES: ENABLE

void
testit (word, ...)
	SV * word;
CODE:
	if (items > 1) {
		int i;
		for (i = 1; i < items; i++) {
			SV * x;
			char * pv;
			int len;
			x = ST(i);
			pv = SvPV (x, len);
			printf ("Argument %d: %s:%d\n", i, pv, len);
		}
	}