#! perl

use strict;
use warnings;

use MyConstants;

# und manchmal ist $constant hier undef - warum?
print "content-type: text/plain\n\n$constant";