Let me try something...

Try this, it works for me. Rename the real Cwd.pm and upload a 'new' Cwd.pm, with the following:

package Cwd;

require Exporter;
use vars @EXPORT;

@EXPORT = qw/getcwd/;

sub import {
    my $pkg = shift;
    my $caller = caller;
    Exporter::export( $pkg, $caller, @EXPORT );
}
sub getcwd { '.' }
1;
[download]

Here are the rest of the modules you'll need:

$ perl -MHTML::Template -e'print join "\n", keys %INC' | sort
base.pm
Carp.pm
Exporter.pm
File/Spec.pm
File/Spec/Unix.pm
HTML/Template.pm
integer.pm
strict.pm
vars.pm
warnings.pm
warnings/register.pm
[download]

Good luck!