bash:# perl index.cgi pg=MyBackOffice do=language_tag_editor view=editTag lngId=151 shell=1
SV = PV(0x76506e8) at 0x6691000
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x7dabbf0 "<form method=\"post\" action=\"http://localhost\" enctype=\"multipart/form-data\" name=\"edit_form\">\n<input type=\"hidden\" name=\"pg\" value=\"MyBackOffice\"  /><input type=\"hidden\" name=\"do\" value=\"language_tag_editor\"  /><input type=\"hidden\" name=\"view\" value=\"saveTag\"  /><input type=\"hidden\" name=\"lngId\" value=\"151\"  /><input type=\"hidden\" name=\"r\" value=\"\"  /><input type=\"hidden\" name=\"q\" value=\"\"  /><input type=\"hidden\" name=\"p\" value=\"\"  /><input type=\"hidden\" name=\"timel\" value=\"1267175109\"  />\n\t\t<table border=\"0\" cellpadding=\"2\" cellspacing=\"2\" align=\"center\" width=\"650\">\n\t\t\t<tr>\n\t\t\t\t<td class=\"td_header_green\" colspan=\"2\">\n\t\t\t\t\tModify a Language Tag\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell\">\n\t\t\t\t\tLanguage:\n\t\t\t\t</td>\n\t\t\t\t<td class=\"non_label_cell\">\n\t\t\t\t\tRussian\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell\">\n\t\t\t\t\tLast Modified:\n\t\t\t\t</td>\n\t\t\t\t<td class=\"non_label_cell\">\n\t\t\t\t\t02/23/10 01:24 PM\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell\">\n\t\t\t\t\tTag:\n\t\t\t\t</td>\n\t\t\t\t<td class=\"non_label_cell\">\n\t\t\t\t\tJoinPage_Final_RegisterButton\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell_center\" colspan=\"2\">\n\t\t\t\t\tCurrent Content:\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"non_label_cell_center\" colspan=\"2\">\n\t\t\t\t\t???????? - ???????????????? ????\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell_center\" colspan=\"2\">\n\t\t\t\t\tNew Content:\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"non_label_cell_center\" colspan=\"2\">\n\t\t\t\t\t<textarea name=\"tagvalue\"  rows=\"10\" cols=\"85\" onfocus=\"this.select()\" class=\"formfield\">???????? - ???????????????? ????</textarea>\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell\" colspan=\"2\">\n\t\t\t\t\tEnglish Version Content:\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"non_label_cell_center\" colspan=\"2\">\n\t\t\t\t\tI agree - Register Me\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t<tr>\n\t\t\t\t<td class=\"label_cell\">\n\t\t\t\t\tEnglish Version Last Modified:\n\t\t\t\t</td>\n\t\t\t\t<td class=\"non_label_cell\">\n\t\t\t\t\t02/22/10 09:36 PM\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t\t\t\n\t\t\t<tr>\n\t\t\t\t<td class=\"non_label_cell_center\" colspan=\"2\">\n\t\t\t\t\t<input type=\"submit\" name=\"choice\" value=\"Preview Changes\" class=\"submit\" />\n\t\t\t\t</td>\n\t\t\t</tr>\n\t\t</table>\n\t\t</form><br /><br />"\0
  CUR = 2240
  LEN = 2248


##</code><code>##

use open ':utf8';
use utf8;