1package Hints_provider_isa;
2use strict;
3use warnings;
4use Exporter 5.57 'import';
5
6our @EXPORT_OK = qw(always_fail always_pass no_hints);
7
8{ package autodie::hints::provider; }
9
10push(our @ISA, 'autodie::hints::provider');
11
12my $package = __PACKAGE__;
13
14sub AUTODIE_HINTS {
15    return {
16        always_fail => { list => sub { 1 }, scalar => sub { 1 } },
17        always_pass => { list => sub { 0 }, scalar => sub { 0 } },
18    };
19}
20
21sub always_fail { return "foo" };
22sub always_pass { return "foo" };
23sub no_hints    { return "foo" };
24
251;
26