prob_foundA: '1608'
The process cannot access the file because it is being used by another process.

##</code><code>##

prob_foundA: '756'

##</code><code>##


package gs;
sub system_start_file {
    my ( $file_to_run, $dont_use_start ) = @_;

    unless ( -f $file_to_run ) {
        my $warn_msg
           = "red_915ssf  Failed to build a proper path name for\n"
           . "'$file_to_run'\n";
        warn $warn_msg;
        custTk::open_unique_tk_n_ask_question( $warn_msg, [ 'Ok' ] );
        return ();
    }

#warn "path537: '$ENV{PATH}'\n";
    #my $prob_found
        #= $dont_use_start
            #? system $file_to_run
            #: system 1, 'start', $file_to_run;

    my $prob_found;
    if ( $dont_use_start ) {
        $prob_found = system $file_to_run;
        $prob_found =
            $prob_found == 0
                ? 'no'
                : 'yes';
    }
    else {
        $prob_found = system 1, 'start', $file_to_run;
warn "prob_foundA: '$prob_found'\n";
        $prob_found =
            $prob_found ne 0
                ? 'no'
                : 'yes';
    }

    #if ( $prob_found )
    if ( $prob_found eq 'yes' ) {
        my $warn_msg
          = "red_915ssfpf '$prob_found' There was a problem in trying to open\n"
          . "'$file_to_run'\n";
        warn $warn_msg;
        custTk::open_unique_tk_n_ask_question( $warn_msg, [ 'Ok' ] );
        #return ();
    }

    return ();
}