package Potato;
use constant tuber => 1;

package main;
print Potato->tuber;