This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
add interpolation test for [perl #70091]
[perl5.git] / t / op / lex.t
CommitLineData
f3365a56
NC
1#!perl -w
2use strict;
3
4require './test.pl';
5
6plan(tests => 2);
7
8{
9 no warnings 'deprecated';
10 print <<; # Yow!
11ok 1
12
13 # previous line intentionally left blank.
14
15 my $yow = "ok 2";
16 print <<; # Yow!
17$yow
18
19 # previous line intentionally left blank.
20}
21
22curr_test(3);