if(! $Global::NoAbsolute and $::Variable->{DOCROOT}) {
$imgdir = "$::Variable->{DOCROOT}$::Variable->{IMAGE_DIR}/$subdir";
}
else {
 $imgdir = "images/$subdir";
}
}

my $imgpath = $opt->{image_path}
       || $::Variable->{CAPTCHA_IMAGE_PATH}
       || "$::Variable->{IMAGE_DIR}/$subdir";


my $captcha = Authen::Captcha->new(
         data_folder => $tmpdir,