Script runs twice

NatalieQ has asked for the wisdom of the Perl Monks concerning the following question:

Hi All,

I am working on Perl API for fax sending. I have created a script that resends a message. The method's variables are: the system's token and the message transaction ID. I receive the ID when I send the message for the first time.

When I run the script, it resends the message. Everything works perfectly. But, the script runs again in several minutes without me executing it. The script looks perfect to me. I am not too familiar with Perl, so maybe I am missing something obvious.

Any ideas why is it happening? I have tested the script in Mozilla and IE with the same result. I would really appreciate any help with that! Thanks.

use SOAP::Lite;
print "Content-type: text/html\n\n";
#---------------------- Please enter your data 
my $token = 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx';
my $link ='xxxxxxxxxxxxxxxxx';
my $msgid = 'xxxx';  #transaction ID

#-----------------------------------------------------

my $start = SOAP::Lite
    ->uri($link)
    ->on_action( sub { join '/', $link, $_[1] } ) 
    ->proxy('https://xxxxxxxxxxxxxxxx?WSDL');
    
my $response = $start
    ->call(SOAP::Data->name('ResendMsg')->attr({xmlns => 'xxxxxxxxxxxx
+xx/'}) =>
    SOAP::Data->name("token" => $token),
    SOAP::Data->name("TransactionID" => $msgid)
    );


if ( $response->fault ) {
    print $response->faultstring . "\n";
    } 
    
print "Result: ".$response->valueof('//ResendMsgRes')."<br/>"; #If suc
+cessful, returns the transactionID
[download]

Comment on Script runs twice Download Code

Replies are listed 'Best First'.
Re: Script runs twice by aitap (Curate) on Aug 21, 2012 at 07:27 UTC
It can be a problem with the Web server setup. Or, perhaps, browsers do some re-caching, or there is a proxy server between the browser and the server and it refreshes the page. Can you see your script being accessed multiple times in the server logs? Sorry if my advice was wrong.	[reply]
Re^2: Script runs twice by Mr. Muskrat (Canon) on Aug 21, 2012 at 20:37 UTC
Or a browser addon like YSlow... So your web app double posts?	[reply]
Re^3: Script runs twice by NatalieQ (Initiate) on Aug 21, 2012 at 23:05 UTC
I have tested the script in several different browsers with the same result. Checked the addons anyway, just to be sure. There are no suspicious addons.	[reply]
Re^2: Script runs twice by NatalieQ (Initiate) on Aug 21, 2012 at 23:06 UTC
Yes, I can see the script being accessed twice every time I run it in the server logs.	[reply]
Re^3: Script runs twice by aitap (Curate) on Aug 22, 2012 at 07:47 UTC
I think there is nothing to do with Perl. Do you have any server-side proxy installed? Sorry if my advice was wrong.	[reply]
Re: Script runs twice by Anonymous Monk on Aug 21, 2012 at 06:41 UTC
Try adding `use SOAP::Lite +trace => 'debug';` for some diagnostics, or $soap->transport->add_handler("request_send", \&pp_dump );	[reply] [d/l]
Re^2: Script runs twice by NatalieQ (Initiate) on Aug 21, 2012 at 23:07 UTC
Thanks for the suggestion, will continue testing.	[reply]
Re: Script runs twice by Anonymous Monk on Aug 21, 2012 at 06:35 UTC
But, the script runs again in several minutes without me executing it. Then someone else executed it	[reply]
Re^2: Script runs twice by NatalieQ (Initiate) on Aug 21, 2012 at 06:45 UTC
Thanks for your reply, but it is definitely not the case. This is my test script, and no one knows that it is there. However, something certainly executes it, but what can it be? Any ideas?	[reply]
Re^3: Script runs twice by Anonymous Monk on Aug 21, 2012 at 07:19 UTC
Thanks for your reply, but it is definitely not the case. This is my test script, and no one knows that it is there. How do you know? However, something certainly executes it, but what can it be? Any ideas? Zombies? No, werewolves? Perhaps aliens?	[reply]
Re^4: Script runs twice by NatalieQ (Initiate) on Aug 21, 2012 at 23:08 UTC


No such thing as a small change
	PerlMonks