my($dir,$fullpath) = @_;