#!/usr/bin/perl
sub static_hash {

	print { one => $_[0], two => time };
	print $/;
}

static_hash(8);
static_hash(9);
static_hash(10);