Help for this page
package Foo; use warnings; ... } 1;
use warnings; use strict; ... Foo::go; print "One=", Foo::ONE, ", Two=", Foo::TWO, ", Three=", Foo::THREE, "\ +n";