From: WATANABE Hirofumi <watanabe@...>
Date: 1997-08-28T14:49:05+09:00
Subject: [ruby-dev:303] Re: illegal here document

わたなべです.

Yukihiro Matsumoto <matz@netlab.co.jp> writes:

:  perlはどうやって演算子の<<とhere documentの<<を区別するか

toke.c をちらっと見ると

    case '<':
	if (expect != XOPERATOR) {
	    if (s[1] != '<' && !strchr(s,'>'))
		check_uni();
	    if (s[1] == '<')
		s = scan_heredoc(s);
	    else
		s = scan_inputsymbol(s);
	    TERM(sublex_start());
	}

こんな感じです. 
$a << だったら left shift しかありえないってことでしょうね.

-- 
わたなべひろふみ