binmode($s)
	unless ($] >= 5.008);