/////  MyConst.pm ////////////
package MyConst;
use Readonly;

Readonly::Scalar $const1 => 1;
///////// END ////////////