my $attr = $Text::CSV::AUTOLOAD;   # bound to 'Text::CSV::getline_hr'
    $attr =~ s/.*:://;             # Now it's just 'getline_hr'
    return unless $attr =~ /^_/;   # returns with no value