$[ = 1;	# set array base to 1
$, = ' ';	# set output field separator
$\ = "\n";	# set output record separator