[perl5.git] / t / lib / croak / toke

__END__
# NAME Unterminated here-doc in string eval
eval "<<foo"; die $@
EXPECT
Can't find string terminator "foo" anywhere before EOF at (eval 1) line 1.
########
# NAME Unterminated here-doc in s/// string eval
eval "s//<<foo/e"; die $@
EXPECT
Can't find string terminator "foo" anywhere before EOF at (eval 1) line 1.
########
# NAME Missing name in "my sub"
use feature 'lexical_subs'; my sub;
EXPECT
The lexical_subs feature is experimental at - line 1.
Missing name in "my sub" at - line 1.
########
# NAME Missing name in "our sub"
use feature 'lexical_subs'; our sub;
EXPECT
The lexical_subs feature is experimental at - line 1.
Missing name in "our sub" at - line 1.
########
# NAME Missing name in "state sub"
use 5.01; use feature 'lexical_subs';
state sub;
EXPECT
The lexical_subs feature is experimental at - line 2.
Missing name in "state sub" at - line 2.
########
# NAME Unterminated delimiter for here document
<<"foo
EXPECT
Unterminated delimiter for here document at - line 1.
Commit	Line	Data
ca8ffed2	1	__END__
5af08aed FC	2	# NAME Unterminated here-doc in string eval
	3	eval "<<foo"; die $@
	4	EXPECT
	5	Can't find string terminator "foo" anywhere before EOF at (eval 1) line 1.
	6	########
	7	# NAME Unterminated here-doc in s/// string eval
	8	eval "s//<<foo/e"; die $@
	9	EXPECT
	10	Can't find string terminator "foo" anywhere before EOF at (eval 1) line 1.
	11	########
ca8ffed2	12	# NAME Missing name in "my sub"
e7d0b801	13	use feature 'lexical_subs'; my sub;
ca8ffed2	14	EXPECT
e7d0b801	15	The lexical_subs feature is experimental at - line 1.
ca8ffed2	16	Missing name in "my sub" at - line 1.
6f2d7fc9	17	########
8767b1ab	18	# NAME Missing name in "our sub"
e7d0b801	19	use feature 'lexical_subs'; our sub;
8767b1ab	20	EXPECT
e7d0b801	21	The lexical_subs feature is experimental at - line 1.
8767b1ab FC	22	Missing name in "our sub" at - line 1.
	23	########
	24	# NAME Missing name in "state sub"
e7d0b801	25	use 5.01; use feature 'lexical_subs';
8767b1ab FC	26	state sub;
8767b1ab FC	27	EXPECT
64fbf0dd	28	The lexical_subs feature is experimental at - line 2.
8767b1ab FC	29	Missing name in "state sub" at - line 2.
8767b1ab FC	30	########
6f2d7fc9 FC	31	# NAME Unterminated delimiter for here document
	32	<<"foo
	33	EXPECT
	34	Unterminated delimiter for here document at - line 1.