in reply to inherit Readonly variables (constants)
use My::Base::Class qw( $TIMEOUT_ERROR ); [download]
Or create a tag if you have lots of error codes:
use My::Base::Class qw( :error_codes ); [download]