Searched refs:bracketed_form (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Cwd/t/
H A Dcwd.t149 sub bracketed_form { subroutine
156 my $bracketed_expect = quotemeta bracketed_form($expect);
157 like( bracketed_form($dir), qr|$bracketed_expect$|i, (@_ ? shift : ()) );

Completed in 1033 milliseconds