Help for this page

Select Code to Download

Select or download this

C:\WINDOWS\system32>perl -MO=Concise -e"if ($x) { print $x }"
8  <@> leave[1 ref] vKP/REFC ->(end)
...
2     <;> nextstate(main 1 -e:1) v:{ ->3                         # nev
+er true
-     <0> ex-const v/SHORT ->3
-e syntax OK