if (-f "$path/$leaf") {
}

# or simply 

chdir($path) || warn();
if (-d $leaf) {
}