[ic] MD5 hex problem. Help me please

[Jonathan Clark]

> > > I've got problem with MD5 again.
> > > with
> > > -----
> > > UserTag md5hash Interpolate
> > > UserTag md5hash HasEndTag
> > > UserTag md5hash Routine <<EOF
> > > use Digest::MD5;
> > > sub {
> > > my $val = shift;
> > > my $hash = MD5->hexhash($val);
> > > return $hash;
> > > }
> > > EOF
> > > -----
> > > in ic error.log I found:
> > >
> > > UserTag 'md5hash' code is not a subroutine reference
> > > > In line 10 of the configuration file 'usertag/md5hash.tag':
> > > > UserTag md5hash Routine <<EOF
> > >
> > > Any idea where I wrong?
> > > Thank to everybody
> > >
> > You probably have whitespace after the 'EOF' on the last line.
...
> No, I've got no white space
> Any other idea?

Should the use line be inside the sub? ie:

UserTag md5hash Routine <<EOF
sub {
 use Digest::MD5;


Jonathan
Webmaint.