#!../../perl 
BEGIN{
    use Cwd;
    my($wd) = cwd();
    $ENV{'ISLVINI'} = "$wd/t/PVCSPROJ/islvrc.txt";
}
$|=1;
print "1..1\n";
use VCS::PVCS::Project;
print "ok 1\n";