Fcntl problem

[wicur]

this statement was OK in old version of perl:

(my $constname = $AUTOLOAD) =~ s/.*:://;

in v5.8.1 built for i386-linux-thread-multi returned

Fcntl::AUTOLOAD(/usr/lib/perl5/5.8.1/i386-linux-thread-multi/Fcntl.pm:224):
224: die "&Fcntl::constant not defined" if $constname eq 'constant';

any suggestions are more then welcome

thanks

wicur