print ("\narea = [$inArea]");print ("\npath = [$inPath]");# ...#my $ddCmd = `/opt/iw-home/OpenDeployNG.....
my ($passed_file_path) = shift; $passed_file_path =~ s|//|/|mg; return "$passed_file_path" unless -e "$passed_file_path"; return if (-d "$passed_file_path");