Приветствую всех знатоков Perl!

Мне необходимо определенным образом модифицировать Багзиллу (а именно - очищать поле «From», если статус бага отличен от указанного)

Нужна ваша помощь, чтобы разобраться в синтаксисе, поскольку сам я сталкиваюсь с Perl впервые. В шаблоне (файл knob.html.tmpl) нашел код, отвечающий за формы «Status» и «From»:

<div id="status">
  [% PROCESS bug/field.html.tmpl
      no_tds = 1
      field  = bug_fields.bug_status
      value  = bug.bug_status
      override_legal_values = bug.choices.bug_status
      editable = bug.choices.bug_status.size > 1
  %]
  <span id="infofrom_settings">
      [% PROCESS bug/field.html.tmpl
    	    no_tds = 1 
    	    field = bug_fields.cf_infofrom
    	    value = bug.cf_infofrom
    	    override_legal_values = bug.choices.cf_infofrom
            editable = bug.check_can_change_field('cf_infofrom', bug.cf_infofrom, 1)
            value_span = 2 %]
  </span>
<div>

Нужно сделать проверку value у status и если оно отлично от того или иного значения, то присвоить value у infofrom на значение --- Подскажите - как правильно это написать, учитывая указанный синтаксис?

Извините, если говорю «не тем языком» и спасибо заранее за помощь )