#!/usr/bin/perl
use strict;

eval 'use constant NAME_MAXLENGTH => 30' unless(defined(&NAME_MAXLENGTH));
eval 'use constant LINK_MAXLENGTH => 256' unless(defined(&LINK_MAXLENGTH));
eval 'use constant SUBJECT_MAXLENGTH => 256' unless(defined(&SUBJECT_MAXLENGTH));
eval 'use constant POST_MAXLENGTH => 8192' unless(defined(&POST_MAXLENGTH));

1;