Help for this page

Select Code to Download

Select or download this

$ perl -MO=Deparse,-p -e " use constant X => 1/3; "
use constant ('X', 0.33333333333333331);
-e syntax OK

Select or download this

$ cat 2
use constant X => 1/3;

...
    PPI::Token::Structure       ';'
  PPI::Token::Whitespace        '\n'
  PPI::Token::Whitespace        '\n'