Help for this page
Select Code to Download
Select
or
download this
$ perl -e'use constant { FOO = 1, BAR = 2}; print FOO,BAR'
Select
or
download this
$ perl -e'use constant { FOO => 1, BAR => 2}; print FOO,BAR' 12$