PHP template for replacements str_ireplace_GREEK_v01

$query = str_ireplace(
                            array (
  "copy",
  "return",
  "clear",
  "draw",
  "cls",
  "if",
  "randomize", "randomise",
  "save",
  "run",
  "plot",
  "print",
  "poke",
  "next",
  "pause",
  "let",
  "list",
  "load",
  "input",
  "go sub", "gosub",
  "go to", "goto",
  "for",
  "rem",
  "dim",
  "continue",
  "border",
  "new",
  "restore",
  "data",
  "read",
  "stop",
  "llist",
  "lprint",
  "out",
  "over",
  "inverse",
  "bright",
  "flash",
  "paper",
  "ink",
  "circle",
  "beep",
  "verify",
  "merge",
  "erase",
  "move",
  "format",
  "cat",
  "def fn", "deffn",
  "step",
  "to",
  "then",
  "line",
  "and",
  "or",
  "bin",
  "not",
  "chr$",
  "str$",
  "usr",
  "in",
  "peek",
  "abs",
  "sgn",
  "sqr",
  "int",
  "exp",
  "ln",
  "atn",
  "acs",
  "asn",
  "tan",
  "cos",
  "sin",
  "len",
  "val",
  "code",
  "val$",
  "tab",
  "at",
  "attr",
  "screen$",
  "point",
  "fn",
  "pi",
  "inkey$",
  "rnd"
                                  ),
                            array (
  "COPY",
  "RETURN",
  "CLEAR",
  "DRAW",
  "CLS",
  "IF",
  "RANDOMIZE", "RANDOMIZE",
  "SAVE",
  "RUN",
  "PLOT",
  "PRINT",
  "POKE",
  "NEXT",
  "PAUSE",
  "LET",
  "LIST",
  "LOAD",
  "INPUT",
  "GO SUB", "GOSUB",
  "GO TO", "GOTO",
  "FOR",
  "REM",
  "DIM",
  "CONTINUE",
  "BORDER",
  "NEW",
  "RESTORE",
  "DATA",
  "READ",
  "STOP",
  "LLIST",
  "LPRINT",
  "OUT",
  "OVER",
  "INVERSE",
  "BRIGHT",
  "FLASH",
  "PAPER",
  "INK",
  "CIRCLE",
  "BEEP",
  "VERIFY",
  "MERGE",
  "ERASE",
  "MOVE",
  "FORMAT",
  "CAT",
  "DEF FN", "DEFFN",
  "STEP",
  "TO",
  "THEN",
  "LINE",
  "AND",
  "OR",
  "BIN",
  "NOT",
  "CHR$",
  "STR$",
  "USR",
  "IN",
  "PEEK",
  "ABS",
  "SGN",
  "SQR",
  "INT",
  "EXP",
  "LN",
  "ATN",
  "ACS",
  "ASN",
  "TAN",
  "COS",
  "SIN",
  "LEN",
  "VAL",
  "CODE",
  "VAL$",
  "TAB",
  "AT",
  "ATTR",
  "SCREEN$",
  "POINT",
  "FN",
  "PI",
  "INKEY$",
  "RND"
                                  ),
                            $query
                          );
__________________________________________
------------greek-------------
$query = str_ireplace(
                            array (
  "copy",
  "return",
  "clear",
  "draw",
  "cls",
  "ΕΑΝ",
  "randomize", "randomise",
  "save",
  "run",
  "plot",
  "ΤΥΠΩΣΕ",
  "poke",
  "ΕΠΟΜΕΝΟ",
  "ΠΑΥΣΗ",
  "ΘΕΣΕ",
  "ΛΙΣΤΑ",
  "load",
  "ΡΩΤΗΣΕ",
  "go sub", "gosub",
  "ΠΗΓΑΙΝΕ", "GOTO",
  "ΓΙΑ",
  "ΣΧΟΛΙΟ",
  "dim",
  "continue",
  "ΠΕΡΙΘ",
  "new",
  "restore",
  "data",
  "read",
  "stop",
  "llist",
  "lprint",
  "out",
  "over",
  "inverse",
  "bright",
  "flash",
  "ΧΑΡΤΙ",
  "ΜΕΛΑΝΙ",
  "circle",
  "beep",
  "verify",
  "merge",
  "erase",
  "move",
  "format",
  "cat",
  "def fn", "deffn",
  "ΒΗΜΑ",
  "ΩΣ",
  "then",
  "line",
  "ΚΑΙ",
  "Η",
  "bin",
  "ΟΧΙ",
  "chr$",
  "str$",
  "usr",
  "in",
  "peek",
  "abs",
  "sgn",
  "sqr",
  "int",
  "exp",
  "ln",
  "atn",
  "acs",
  "asn",
  "tan",
  "cos",
  "sin",
  "len",
  "val",
  "code",
  "val$",
  "tab",
  "ΣΤΟ",
  "attr",
  "screen$",
  "point",
  "fn",
  "pi",
  "inkey$",
  "ΤΥΧ"
                                  ),
                            array (
  "COPY",
  "RETURN",
  "CLEAR",
  "DRAW",
  "CLS",
  "IF",
  "RANDOMIZE", "RANDOMIZE",
  "SAVE",
  "RUN",
  "PLOT",
  "PRINT",
  "POKE",
  "NEXT",
  "PAUSE",
  "LET",
  "LIST",
  "LOAD",
  "INPUT",
  "GO SUB", "GOSUB",
  "GO TO", "GOTO",
  "FOR",
  "REM",
  "DIM",
  "CONTINUE",
  "BORDER",
  "NEW",
  "RESTORE",
  "DATA",
  "READ",
  "STOP",
  "LLIST",
  "LPRINT",
  "OUT",
  "OVER",
  "INVERSE",
  "BRIGHT",
  "FLASH",
  "PAPER",
  "INK",
  "CIRCLE",
  "BEEP",
  "VERIFY",
  "MERGE",
  "ERASE",
  "MOVE",
  "FORMAT",
  "CAT",
  "DEF FN", "DEFFN",
  "STEP",
  "TO",
  "THEN",
  "LINE",
  "AND",
  "OR",
  "BIN",
  "NOT",
  "CHR$",
  "STR$",
  "USR",
  "IN",
  "PEEK",
  "ABS",
  "SGN",
  "SQR",
  "INT",
  "EXP",
  "LN",
  "ATN",
  "ACS",
  "ASN",
  "TAN",
  "COS",
  "SIN",
  "LEN",
  "VAL",
  "CODE",
  "VAL$",
  "TAB",
  "AT",
  "ATTR",
  "SCREEN$",
  "POINT",
  "FN",
  "PI",
  "INKEY$",
  "RND"
                                  ),
                            $query
                          );