print "\@var has ", eval_array_size(\@var), " elements.\n";

	sub eval_array_size {
		my $aref = shift;
		return scalar @{$aref};
	}

##</code><code>##

	sub eval_array_size (\@) {
		my $aref = shift;
		return scalar @{$aref};
	}
	
	print "\@var has ", eval_array_size(@var), " elements.\n";