# something like..

$path = File::Spec->rel2abs( $path ) unless File::Spec->file_name_is_absolute( $path )