$ perl -f -we " use File::Spec::Functions; my $x=q{x}; require catfile($x,catfile($x,$x)) "
syntax error at -e line 1, near "require catfile("
Execution of -e aborted due to compilation errors.

$ perl -f -we " use File::Spec::Functions; my $x=q{x}; require scalar(catfile($x,catfile($x,$x))) "
Can't locate x\x\x in @INC