123
my $path = File::Spec->catdir('C:','Temp');mkdir($path);my $file = File::Spec->catfile($path,'index.html');