#!/usr/bin/perl

#use strict;
use warnings;
use Params::Validate;

sub func1 {
	validate_pos( @_, { type => SCALAR} );

	print "hi fluffy\n";
}

func1("test");