package Cwd::Initial;
use strict;
use warnings;

use Cwd ();

our $cwd;
our $VERSION = '0.10';

sub _getcwd {
   $cwd = Cwd::getcwd();
}

BEGIN {
    _getcwd();
}

sub getcwd {
    return $cwd;
}

1;