The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package File::Spec::Functions;

use File::Spec;
use strict;

use vars qw(@ISA @EXPORT);

require Exporter;

@ISA = qw(Exporter);

@EXPORT = qw(
	canonpath
	catdir
	catfile
	curdir
	rootdir
	updir
	no_upwards
	file_name_is_absolute
	path
	nativename
);

sub canonpath { File::Spec->canonpath(@_); }
sub catdir { File::Spec->catdir(@_); }
sub catfile { File::Spec->catfile(@_); }
sub curdir { File::Spec->curdir(@_); }
sub rootdir { File::Spec->rootdir(@_); }
sub updir { File::Spec->updir(@_); }
sub no_upwards { File::Spec->no_upwards(@_); }
sub file_name_is_absolute { File::Spec->file_name_is_absolute(@_); }
sub path { File::Spec->path(@_); }
sub nativename { File::Spec->nativename(@_); }

1;