#!/usr/bin/perl -w



sub stuff {
	local($name, $verb, $adj) = @_;    # @_ is the secret variable to the argument to the function
	print "I got $name $verb $adj\n";
}


sub stuff2 {
	print "I got $_[0] $_[1] $_[2]\n";   # in perl one can write unreadable code!
}

stuff("Jacob", "can", "bowl");
stuff2("Jacob", "knows", "bowling");
