Lines Matching refs:Spec
9 use File::Spec;
15 $dir = File::Spec->catdir( "auto-$$" );
22 my $fulldir = File::Spec->catdir( $dir, 'auto', 'Foo' );
25 open(FOO, '>', File::Spec->catfile( $fulldir, 'foo.al' ))
34 open(BAR, '>', File::Spec->catfile( $fulldir, 'bar.al' ))
43 open(BAZ, '>', File::Spec->catfile( $fulldir, 'bazmarkhian.al' ))
52 open(BLECH, '>', File::Spec->catfile( $fulldir, 'blechanawilla.al' ))
62 open(BLECH, '>', File::Spec->catfile( $fulldir, 'blechanawil.al' ))
124 open(F, '>', File::Spec->catfile( $fulldir, 'a.al'))
134 open(F, '>', File::Spec->catfile( $fulldir, 'b.al'))