faster tempfile handling for interactive scripts

Author: ddmitov

README.md

@@ -85,7 +85,7 @@ Press <kbd>Ctrl</kbd> + <kbd>I</kbd> to open the ``QWebInspector`` and go to the
 
 ## History
 
-PEB was started in 2013 by Dimitar D. Mitov as a simple GUI for personal database applications.
+PEB was started in 2013 by Dimitar D. Mitov as a simple user interface for personal database applications.
 
 ## [Thanks and Credits](CREDITS.md)
 

doc/INTERACTIVE.md

@@ -30,8 +30,8 @@ PEB interactive Perl scripts are able to receive user input multiple times after
   }
   ```
 
-* **Temporary File Full Path Message**
-  Every interactive script using temporary file must send the full path of its temporary file to PEB using the following simple JSON message:  
+* **Temporary File Full Path Message**  
+  Once started, every interactive Pel script using temporary file must send on STDOUT the full path of its temporary file in the following JSON message:  
 
   ```javascript
   {"tempfile":"/path/to/tempfile"}

resources/app/index.html

@@ -143,7 +143,7 @@
         <a class="btn btn-primary" href="perl_info.script">Perl Basic Information</a>
         <a class="btn btn-primary" href="sqlite.script">SQLite Test</a>
         <a class="btn btn-primary" href="javascript:clearTestData();">Clear Test Data</a>
-        <a class="btn btn-primary" href="https://www.google.com/">Google</a>
+        <a class="btn btn-primary" href="https://duckduckgo.com/html">DuckDuckGo</a>
         <a class="btn btn-primary" href="javascript:about();" role="button">About</a>
       </div>
 

src/webkit-page.h

@@ -354,19 +354,22 @@ public slots:
     void qDisplayScriptOutputSlot(QString id, QString output)
     {
         if (QPage::mainFrame()->url().scheme() == "file") {
+            QString outputInsertionJavaScript =
+                    id + ".stdoutFunction('" + output + "'); null";
+
+            mainFrame()->evaluateJavaScript(outputInsertionJavaScript);
+
             if (output.contains("tempfile")) {
                 QJsonDocument tempFileJsonDocument =
                         QJsonDocument::fromJson(output.toUtf8());
                 QJsonObject tempFileJsonObject = tempFileJsonDocument.object();
                 QString tempFileFullPath =
                         tempFileJsonObject["tempfile"].toString();
 
-                temporaryFiles.insert(id, tempFileFullPath);
-            } else {
-                QString outputInsertionJavaScript =
-                        id + ".stdoutFunction('" + output + "'); null";
-
-                mainFrame()->evaluateJavaScript(outputInsertionJavaScript);
+                QFileInfo tempFileInfo(tempFileFullPath);
+                if (tempFileInfo.isFile()) {
+                    temporaryFiles.insert(id, tempFileFullPath);
+                }
             }
         }
     }