for(@_)
{
	$in .=' '.($t = $_ - $last);
	$last = $_;
}