Open jhi opened 8 years ago
It's just a funny variable name.
perl -Mstrict -MCompiler::Lexer -MData::Dumper -wle 'print Dumper(Compiler::Lexer->new->tokenize(q[${^FOO}]))' $VAR1 = [ bless( { 'kind' => 23, 'has_warnings' => 0, 'stype' => 0, 'name' => 'ScalarDereference', 'data' => '${', 'type' => 115, 'line' => 1 }, 'Compiler::Lexer::Token' ), bless( { 'kind' => 1, 'has_warnings' => 0, 'stype' => 0, 'name' => 'BitXOr', 'data' => '^', 'type' => 17, 'line' => 1 }, 'Compiler::Lexer::Token' ), bless( { 'kind' => 24, 'has_warnings' => 1, 'stype' => 0, 'name' => 'Key', 'data' => 'FOO', 'type' => 122, 'line' => 1 }, 'Compiler::Lexer::Token' ), bless( { 'kind' => 22, 'has_warnings' => 0, 'stype' => 0, 'name' => 'RightBrace', 'data' => '}', 'type' => 110, 'line' => 1 }, 'Compiler::Lexer::Token' ) ];
(The ScalarDereference is a bug, too, opened https://github.com/goccy/p5-Compiler-Lexer/issues/65 for it.)
It's just a funny variable name.
perl -Mstrict -MCompiler::Lexer -MData::Dumper -wle 'print Dumper(Compiler::Lexer->new->tokenize(q[${^FOO}]))' $VAR1 = [ bless( { 'kind' => 23, 'has_warnings' => 0, 'stype' => 0, 'name' => 'ScalarDereference', 'data' => '${', 'type' => 115, 'line' => 1 }, 'Compiler::Lexer::Token' ), bless( { 'kind' => 1, 'has_warnings' => 0, 'stype' => 0, 'name' => 'BitXOr', 'data' => '^', 'type' => 17, 'line' => 1 }, 'Compiler::Lexer::Token' ), bless( { 'kind' => 24, 'has_warnings' => 1, 'stype' => 0, 'name' => 'Key', 'data' => 'FOO', 'type' => 122, 'line' => 1 }, 'Compiler::Lexer::Token' ), bless( { 'kind' => 22, 'has_warnings' => 0, 'stype' => 0, 'name' => 'RightBrace', 'data' => '}', 'type' => 110, 'line' => 1 }, 'Compiler::Lexer::Token' ) ];
(The ScalarDereference is a bug, too, opened https://github.com/goccy/p5-Compiler-Lexer/issues/65 for it.)