removal of duplicated code

Author: ddmitov

README.md

@@ -82,7 +82,7 @@ in the documentation of this project are to be interpreted as described in [RFC
 
 ## Features
 
-* PEB can be started from any folder without installation procedure.
+* [PEB can be started from any folder without installation procedure.](./doc/CONSTANTS.md)
 * [Perl script output is seamlessly inserted in a nice HTML user interface.](./doc/SETTINGS.md#perl-scripts-api)
 * [Event-driven interactive Perl scripts can be repeatedly fed with data.](./doc/SETTINGS.md#interactive-perl-scripts)
 * [Any version of Perl 5 can be used.](./doc/REQUIREMENTS.md#runtime-requirements)

doc/SETTINGS.md

@@ -58,33 +58,33 @@ The ``pebSettings`` JavaScript object may have the following properties:
 
 ## Perl Scripts API
 
-Every Perl script run by PEB has a JavaScript settings object with an arbitrary name and fixed object properties. The name of the JavaScript settings object with a ``.script`` extension forms settings pseudo link used to start the Perl script.  
+Every Perl script run by PEB has a JavaScript settings object with an arbitrary name and fixed object properties. The name of the JavaScript settings object with a ``.script`` extension forms a pseudo link used to start the Perl script.  
 
 There are three methods to start a local Perl script:  
 
-* **Clicking a link to a script settings pseudo link:**  
+* **Clicking a link to a script pseudo link:**  
 
   ```html
   <a href="test.script">Start Perl script</a>
   ```
 
-* **Submitting a form to a script settings pseudo link:**  
+* **Submitting a form to a script pseudo link:**  
 
   ```html
   <form action="test.script">
     <input type="submit" value="Start Perl script">
   </form>
   ```
 
-* **Calling a JavaScript function with a script settings pseudo link:**  
+* **Calling a JavaScript function with a script pseudo link:**  
 
   ```javascript
   peb.startScript('test.script');
   ```
 
-  This method creates an invisible form and submits it to the script settings pseudo link.  
+  This method creates an invisible form and submits it to the script pseudo link.  
 
-A minimal example of a JavaScript settings object for a Perl script run by PEB:  
+An example of a JavaScript settings object for a Perl script run by PEB:  
 
 ```javascript
 var perl_script = {};
@@ -99,7 +99,8 @@ A JavaScript settings object for a Perl script run by PEB has the following prop
 
 * **scriptRelativePath**  
   ``String`` for the relative path of a Perl script run by PEB  
-  The script relative path is converted to a full path using the ``{PEB_app_directory}`` as a root folder.  
+  The relative path of a script is converted to a full path using the  
+  ``{PEB_executable_directory}/resources/app`` as a root folder.  
   PEB does not check filename extensions or shebang lines of Perl scripts.  
   Scripts without filename extensions can also be used.  
   *This object property is mandatory.*  
@@ -111,7 +112,6 @@ A JavaScript settings object for a Perl script run by PEB has the following prop
 * **stdoutFunction**  
   executed every time data is available on STDOUT  
   The only parameter passed to the ``stdoutFunction`` is the STDOUT ``String``.  
-  *This object property is mandatory.*  
 
   An example of an immediate STDOUT data display without accumulation:
 

resources/app/index-windows.html

@@ -22,10 +22,10 @@
         'Text was entered in a form and it is going to be lost!\n' +
         'Are you sure you want to close the application?';
 
-      // Settings objects for Perl scripts
-      // Interactive script:
+      // PEB settings objects for auto-started Perl interactive scripts:
       var messenger_one = {};
       messenger_one.scriptRelativePath = 'perl-scripts/messenger.pl';
+
       messenger_one.inputData = function() {
         var message = {};
         if(("tempfile" in messenger_one)) {
@@ -38,6 +38,7 @@
 
       var messenger_two = {};
       messenger_two.scriptRelativePath = 'perl-scripts/messenger.pl';
+
       messenger_two.inputData = function() {
         var message = {};
         if(("tempfile" in messenger_two)) {
@@ -50,11 +51,13 @@
 
       var interactive_one = {};
       interactive_one.scriptRelativePath = 'perl-scripts/interactive-windows.pl';
+
       interactive_one.inputData = function() {
         var input = {};
         input.mode = "unix-epoch";
         return JSON.stringify(input);
       }
+
       interactive_one.stdoutFunction = function (stdout) {
         var target = document.getElementById('instance-one-output');
         var output = JSON.parse(stdout);
@@ -72,11 +75,13 @@
 
       var interactive_two = {};
       interactive_two.scriptRelativePath = 'perl-scripts/interactive-windows.pl';
+
       interactive_two.inputData = function() {
         var input = {};
         input.mode = "local-time";
         return JSON.stringify(input);
       }
+
       interactive_two.stdoutFunction = function (stdout) {
         var target = document.getElementById('instance-two-output');
         var output = JSON.parse(stdout);
@@ -91,147 +96,16 @@
           target.innerHTML = html;
         };
       }
-
-      // Other PEB tests:
-      var open_file = {};
-      open_file.scriptRelativePath = 'perl-scripts/open-files.pl';
-      open_file.stdoutFunction = function (stdout) {
-        displayTestResult('open-file', stdout);
-      }
-
-      var open_files = {};
-      open_files.scriptRelativePath = 'perl-scripts/open-files.pl';
-      open_files.stdoutFunction = function (stdout) {
-        displayTestResult('open-files', stdout);
-      }
-
-      var open_directory = {};
-      open_directory.scriptRelativePath = 'perl-scripts/open-directory.pl';
-      open_directory.stdoutFunction = function (stdout) {
-        displayTestResult('open-directory', stdout);
-      }
-
-      var perl_info = {};
-      perl_info.scriptRelativePath = 'perl-scripts/perl-info.pl';
-      perl_info.stdoutFunction = function (stdout) {
-        clearTestData();
-        displayTestResult('perl-info', stdout);
-      }
-
-      var sqlite = {};
-      sqlite.scriptRelativePath = 'perl-scripts/sqlite.pl';
-      sqlite.stdoutFunction = function (stdout) {
-        clearTestData();
-        displayTestResult('sqlite-test', stdout);
-      }
-
-      // Settings objects for the filesystem dialogs:
-      var select_file = {};
-      select_file.type = 'single-file';
-      select_file.receiverFunction = function (fileName) {
-        open_file.inputData = fileName;
-        clearTestData();
-        peb.startScript('open_file.script');
-      }
-
-      var new_file_name = {};
-      new_file_name.type = 'new-file-name';
-      new_file_name.receiverFunction = function (fileName) {
-        clearTestData();
-        var pre = document.createElement("pre");
-        pre.innerHTML = 'New file name: ' + fileName;
-        document.getElementById('tests').appendChild(pre);
-      }
-
-      var select_files = {};
-      select_files.type = 'multiple-files';
-      select_files.receiverFunction = function (fileNames) {
-        open_files.inputData = fileNames;
-        clearTestData();
-        peb.startScript('open_files.script');
-      }
-
-      var select_directory = {};
-      select_directory.type = 'directory';
-      select_directory.receiverFunction = function (directoryName) {
-        open_directory.inputData = directoryName;
-        clearTestData();
-        peb.startScript('open_directory.script');
-      }
-
-      function startPerlInfo() {
-        peb.startScript('perl_info.script');
-      }
-
-      function startSqlite() {
-        peb.startScript('sqlite.script');
-      }
-
-      function clearTestData() {
-        var container = document.getElementById('tests');
-        while (container.firstChild) {
-          container.removeChild(container.firstChild);
-        }
-      }
-
-      function displayTestResult(id, stdout) {
-        var existingElement = document.getElementById(id);
-        if (existingElement === null) {
-          clearTestData();
-          var newElement = document.createElement("pre");
-          newElement.id = id;
-          newElement.innerHTML = stdout;
-          document.getElementById('tests').appendChild(newElement);
-        } else {
-          existingElement.innerHTML = existingElement.innerHTML + stdout;
-        }
-      }
     </script>
 
     <script src="jquery/jquery-1.12.4.min.js"></script>
     <script src="bootstrap/js/bootstrap.js"></script>
     <script src="bootstrap/js/bootstrap-dropdown.js"></script>
+    <script src="peb-demo.js"></script>
 
     <link rel="stylesheet" type="text/css" href="bootstrap/css/bootstrap.css" media="all">
     <link rel="stylesheet" type="text/css" href="bootstrap/css/darkly-theme.css" media="all">
-
-    <style type='text/css'>
-      body {
-        padding-top: 65px;
-      }
-
-      pre {
-        margin: 4px;
-        text-align: left;
-        font-size: 14px;
-        font-family: sans-serif;
-      }
-
-      .navbar .navbar-header {
-        text-align: center;
-        vertical-align: middle;
-      }
-
-      .navbar .navbar-nav {
-        display: inline-block;
-        float: center;
-      }
-
-      .navbar-toggle {
-        float: center;
-        margin: 10px;
-        vertical-align: middle;
-      }
-
-      .introduction {
-        font-size: 20px;
-      }
-
-      .interactive-output {
-        font-size: 20px;
-        margin-bottom: 20px;
-      }
-    </style>
+    <link rel="stylesheet" type="text/css" href="peb-demo.css" media="all">
   </head>
 
   <body>