File::Spec

use File::Spec;
$dir = File::Spec->catdir('./' , 'cgi' , 'hoge');  #-> cgi/hoge

異なるOSでのパス指定の差を吸収する? みたいな。


http://search.cpan.org/~kwilliams/PathTools-3.17/lib/File/Spec.pm