add Cwd fake package

1 files changed, 28 insertions, 0 deletions

diff --git a/fake_packages/Cwd.pm b/fake_packages/Cwd.pm
new file mode 100644
index 0000000..69edad3
--- /dev/null
+++ b/fake_packages/Cwd.pm
@@ -0,0 +1,28 @@
+
+package Cwd;
+our @ISA = qw();
+sub CLONE { my (@_more_paras) = @_ }
+sub _backtick_pwd() {}
+sub _carp() {}
+sub _croak() {}
+sub _dos_cwd() {}
+sub _epoc_cwd() {}
+sub _os2_cwd() {}
+sub _perl_abs_path { my ($_o_start) = @_ }
+sub _perl_getcwd() {}
+sub _qnx_abs_path { my ($_o_path) = @_ }
+sub _qnx_cwd() {}
+sub _vms_abs_path() {}
+sub _vms_cwd() {}
+sub _vms_efs() {}
+sub _vms_unix_rpt() {}
+sub _win32_cwd() {}
+sub _win32_cwd_simple() {}
+sub abs_path { my ($_o_pathsv) = @_ }
+sub chdir { my ($_o_newdir) = @_ }
+sub chdir_init() {}
+sub fast_abs_path { my ($_o_path) = @_ }
+sub fastcwd { my (@_more_paras) = @_ }
+sub fastcwd_() {}
+sub getcwd { my (@_more_paras) = @_ }
+sub getdcwd { my (@_more_paras) = @_ }