$ perl -wle'
use CGI;
use File::Spec;
print "yes" if CGI->can("File::Spec::catfile")'
yes
$