BEGIN
{
	strcpy(RS,".");  # set record seperator to a period
}
{
	if ( match( $1, @^[a-z]@ ) )
		*$1 = toupper( *$1 );
	printf( "%s\n", $0 );
}