Hi There, I have a client server application in which client sends a input file to server ,server uses a tool called abc.exe on that input file, which gives an output file and sends it back to client.The name for the output file is basically output_input file.if the output file with the same name is already present then it increments the suffix at each run. I have written this code but its not working correctly.I guess there is some problem with the $abc_cmd.Can anyone tell me what I am doing wrong? 


        # Read the signing image_type from the client app via the sock
+et
        $image_type = <$client_socket>;
        chop($image_type);
        
        # Setup some default filenames and command strings.
        my $unsigned_file = "unsigned.bin";
        my $signed_filename;
        my $output_file = "signed.$unsigned_file";
        my $rcv_filesize;
        my $hsm_cmd;
        my $buf;
        my $error = "ACK\n";

       $rcv_filesize = 0;                
       my $i = 1;
       while (-e $output_file) {
      $output_file = "output.$input_file$i";
                $i++;
                }
      $abc_cmd = "abc.exe" -i $input_file -o $output_file"; 
      print $client_socket "ACK\n";


    system $abc_cmd;     # Run the command
        print "DONE\n";
        
        # Open the file for reading 
         open(INFILE, $output_file) || die "ERROR:  Could not open out
+put_file for reading!\n";
        binmode INFILE;
        {
            local $/;
            $output_data = <INFILE>;
        }
        close(INFILE);

        print "$prefix Sending $output_file to the client... ";
        $client_socket->write($output_data, length($output_data));
        
        print length($output_data), " bytes: DONE\n";
        
        $client_socket->close();
        print "$prefix Socket closed, operation completed!\n";

[download]

In reply to Access an executable from perl script by abcdefg

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.