($volume,$directories,$file) = File::Spec->splitpath( $filename );