Cross Reference: Functions.t
xref
: /
osnet-11
/
usr
/
src
/
cmd
/
perl
/
5.8.4
/
distrib
/
lib
/
File
/
Spec
/
t
/
Functions.t
Home
History
Annotate
Line#
Navigate
Download
Search
only in
./
1
N/A
#!/
usr
/
bin
/
perl
-w
1
N/A
1
N/A
use
Test
;
1
N/A
use
File
::
Spec
::
Functions
qw
/:
ALL
/;
1
N/A
plan
tests
=>
2
;
1
N/A
1
N/A
ok
catfile
(
'a'
,
'b'
,
'c'
)
,
File
::
Spec
->
catfile
(
'a'
,
'b'
,
'c'
)
;
1
N/A
1
N/A
# seems to return 0 or 1, so see if we can call it - 2003-07-07 tels
1
N/A
ok
case_tolerant
()
,
'/^0|1$/'
;