diff --git a/euler4.php b/euler4.php
new file mode 100644
index 0000000..28e3a5f
--- /dev/null
+++ b/euler4.php
@@ -0,0 +1,22 @@
+<?php
+/*
+* Gnieark's anwser to euler problem 4
+* https://projecteuler.net/problem=4
+*/
+
+$pal=0;
+for($i=1000;$i>99;$i--){
+    for($j=1000;$j>99;$j--){
+        $prod=$i*$j;
+        if ((isPalindrome($prod)) && ($prod>$pal)) {
+            $pal=$prod;
+        }
+    }
+}
+echo $pal;
+
+function isPalindrome($number){
+    if(strrev(strval($number)) == strval($number)){
+        return true;
+    }
+}
\ No newline at end of file