use Readonly;
Readonly my $DEBUG => 0;

if ($DEBUG)
{
	print "Calculator with debugging...";
}
else
{
	print "Calculator...";
}

print "1 + 1 = ", (1 + 1), "\n";