Select Code to Download

index = `cat /tmp/myfile.index`
$index = $index + 1
echo $index > /tmp/myfile.index
exit 0

if(! -e "/tmp/test.index") {
  system("/usr/bin/touch /tmp/test.index"); }
#This first test is necessary because if I add the creation permission
+ to the open command, it clobbers the file, preventing me from readin
+g from it
...
#This command has no apparent effect.  
close(FILE);
exit 0;