use fIlE::SpEc qw(catfile); # note the wrong case

$x = File::Spec->catfile('a', 'b', 'c'); # this works
$x = catfile('a', 'b', 'c'); # this croaks