The following script does the following find the files test.txt and rename its to rntest.txt and displays test was successful or Renaming failed or file may not exsist. now this is a tset script and if this script was executed it will only display test was successful once and ever other try afterwards will display Renaming failed or file may not exsist because the file test.txt wont exsist but some some reason when i run the script repeatly on my web browser i get test was successful even tho i know it can't cause test.txt no longer exsist. why is it running so slow, its like its running on cache memory?
==========================================================
#!/usr/bin/perl
print "Content-type: text/html\n\n";
file fosent exsist</p>"}
unless(rename("test.txt", "rntest.txt"
)
{print "<p>Renaming failed or file may not exsist</p>"}
else{print "<p>Rename was success</p>"}
==========================================================
#!/usr/bin/perl
print "Content-type: text/html\n\n";
file fosent exsist</p>"}
unless(rename("test.txt", "rntest.txt"
){print "<p>Renaming failed or file may not exsist</p>"}
else{print "<p>Rename was success</p>"}