QFileWriter

Author: ddmitov

README.md

@@ -73,8 +73,9 @@ in the documentation of this project are to be interpreted as described in [RFC
 
 ## Limitations
 
-* No pop-up windows
 * No Perl scripting inside frames
+* Limited HTML5 support
+* No pop-up windows
 * No file download
 * No printing
 

doc/screenshot.png

@@ -0,0 +1,35 @@
+/*
+ Perl Executing Browser
+
+ This program is free software;
+ you can redistribute it and/or modify it under the terms of the
+ GNU Lesser General Public License,
+ as published by the Free Software Foundation;
+ either version 3 of the License, or (at your option) any later version.
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY;
+ without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE.
+ Dimitar D. Mitov, 2013 - 2019
+ Valcho Nedelchev, 2014 - 2016
+ https://github.com/ddmitov/perl-executing-browser
+*/
+
+#include <QFile>
+#include <QTextStream>
+
+#include "file-writer.h"
+
+// ==============================
+// FILE READER CONSTRUCTOR:
+// ==============================
+QFileWriter::QFileWriter(QString filePath, QString fileContents)
+    : QObject(0)
+{
+  QFile file(filePath);
+  if (file.open(QIODevice::ReadWrite | QIODevice::Text)) {
+      QTextStream fileStream(&file);
+      fileStream << fileContents <<endl;
+      file.close();
+  }
+}

src/file-writer.cpp

@@ -0,0 +1,34 @@
+/*
+ Perl Executing Browser
+
+ This program is free software;
+ you can redistribute it and/or modify it under the terms of the
+ GNU Lesser General Public License,
+ as published by the Free Software Foundation;
+ either version 3 of the License, or (at your option) any later version.
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY;
+ without even the implied warranty of MERCHANTABILITY or
+ FITNESS FOR A PARTICULAR PURPOSE.
+ Dimitar D. Mitov, 2013 - 2019
+ Valcho Nedelchev, 2014 - 2016
+ https://github.com/ddmitov/perl-executing-browser
+*/
+
+#ifndef FILE_WRITER_H
+#define FILE_WRITER_H
+
+#include <QObject>
+
+// ==============================
+// FILE WRITER CLASS DEFINITION:
+// ==============================
+class QFileWriter : public QObject
+{
+    Q_OBJECT
+
+public:
+    explicit QFileWriter(QString filePath, QString fileContents);
+};
+
+#endif // FILE_WRITER_H

src/file-writer.h

@@ -48,6 +48,7 @@ QT += widgets webkitwidgets
 SOURCES += \
     main.cpp \
     file-reader.cpp \
+    file-writer.cpp \
     main-window.cpp \
     script-handler.cpp \
     webkit-page.cpp \
@@ -56,6 +57,7 @@ SOURCES += \
 # Header files:
 HEADERS += \
     file-reader.h \
+    file-writer.h \
     script-handler.h \
     webkit-main-window.h \
     webkit-page.h \

src/peb.pro

@@ -33,6 +33,7 @@
 #include <QWebPage>
 
 #include "file-reader.h"
+#include "file-writer.h"
 #include "script-handler.h"
 
 // ==============================
@@ -343,12 +344,7 @@ public slots:
 
     void qWriteInScriptTempFile(QString tempFileFullPath, QString scriptInput)
     {
-        QFile file(tempFileFullPath);
-        if (file.open(QIODevice::ReadWrite | QIODevice::Text)) {
-            QTextStream fileStream(&file);
-            fileStream << scriptInput <<endl;
-            file.close();
-        }
+        QFileWriter(tempFileFullPath, scriptInput);
     }
 
     void qDisplayScriptOutputSlot(QString id, QString output)