use strict;
  use Exporter qw(import);
  our @EXPORT = qw($tinytext $text $mediumtext $longtext);

  our $tinytext = 100;
  our $text = 200;
  our $mediumtext = 500;
  our $longtext = 2000;