package ABC;
use constant DEF => 'test';

package XYZ;
print "value: ABC::DEF\n"; # geht nicht
$string .= &ABC::DEF; # sieht komisch aus
$string .= ABC::DEF(); # die () passen nicht zu Konstanten