-d $s and $s = abs_path($s) or return -1 ; 
  -d $d and $d = abs_path($d) or return -1 ;