Lines Matching full:cwd

11 my $cwd = Cwd::sys_cwd();
12 ok -d $cwd;
14 my $lpb = Cwd::extLibpath;
17 my $lpe = Cwd::extLibpath(1);
20 ok Cwd::extLibpath_set("$lpb$cwd");
22 $lpb = Cwd::extLibpath;
24 (my $s_cwd = $cwd) =~ s#\\#/#g;
28 ok Cwd::extLibpath_set("$lpe$cwd", 1);
30 $lpe = Cwd::extLibpath(1);
50 is(OS2::DLLname($_), OS2::DLLname($_, \&Cwd::extLibpath) ) for 0..2;
51 ok(not defined eval { OS2::DLLname $_, \&Cwd::cwd; 1 } ) for 0..2;