@veg=("71", "111",             "32", "86", "101",
"103", "101", "116", "97",     "114",          "105",
"97",            "110",        "100",           "101",
"13",            "152",        "98",            "95",
"90",            "89",         "97",            "96",
"70",            "12",         "42",            "34",
"45",                          "39",            "99",
"10",       "165454545544",    "55",            "66",
"77",            "88",         "99",            "58",
"11",            "56",         "49",            "56",
"63",            "70",         "77",            "84",
  "91",         "98",           "05",          "12",
    "15425454555",                  "54535335");




@eta=       ("Goze
afyuz      ei","o
 r",      " a",
 "Ve     fig
  da    zji
   ", "eg
     zeg       fe", "gz er
               dz
               ",
               "e
               ta
               ef", "tz
               ek
               rd
               az"
               ,"ardkgjrg


                           ","rdsfh
                         hbf"     ,"i
                        sdf        he
                        ","a
                        ef           
                        ds     gjn","nej
                        fe         h",
                        " a       ","!
                         ",      "!"
                            ); $g++;



$i=0;foreach$v(@veg){$i++;$wo=chr($v);if($i<14){print$wo;}}print"\n";f
+oreach$e(@eta){print substr($e,0,1);}
[download]