add Carp fake package

1 files changed, 26 insertions, 0 deletions

diff --git a/fake_packages/Carp.pm b/fake_packages/Carp.pm
new file mode 100644
index 0000000..a641083
--- /dev/null
+++ b/fake_packages/Carp.pm
@@ -0,0 +1,26 @@
+
+package Carp;
+our @ISA = qw();
+sub Regexp::CARP_TRACE() {}
+sub _cgc() {}
+sub _fetch_sub { my ($_pack, $_o_sub) = @_ }
+sub caller_info() {}
+sub carp() {}
+sub cluck() {}
+sub confess() {}
+sub croak() {}
+sub export_fail() {}
+sub format_arg() {}
+sub get_status() {}
+sub get_subname() {}
+sub long_error_loc() {}
+sub longmess() {}
+sub longmess_heavy() {}
+sub ret_backtrace { my ($_i, @_more_paras) = @_ }
+sub ret_summary { my ($_i, @_more_paras) = @_ }
+sub short_error_loc() {}
+sub shortmess() {}
+sub shortmess_heavy() {}
+sub str_len_trim() {}
+sub trusts() {}
+sub trusts_directly() {}