Select Code to Download

perl -wE '
my @foo = (1, 2, 3);
...
'
1

perl -MTest::Deep::NoTest=eq_deeply -wE '
my @foo = (1, 2, 3);
...
'
1
0

perl -wE '
my @foo = (1, 2, 3);
...
Smartmatch is experimental at -e line 6.
1