Hi monk,
I am working with a Perl which looks like below :

  sub display {
                $self = shift;
                if(exists $error){
                  $html .= "<table border=0>";
                  $html .= "<tr>";
                  $html .= "<td align=center ><b>".$self->     {error}
+."</b></td>";
                  $html .= "</tr>";
                  $html .= "</table><br>";
           }
     
                 $html .= <<END;
     
                    <table border=0>
                    <tr>
                   <th bgcolor="#CCCCEE">Name</th><th>&nbsp;     </th>
+<th bgcolor="#CCCCEE">Address</th>
                   </tr>
        
                   <tr align=center>
                   <td bgcolor="#EEEEEE">@{[ $qry->popup_menu(-id=>'ID
+', -name=>'PS', -size=>10, -values=>$array_ref, -labels=>$hash_ref,  
+-onChange=>"fetchData(id,'','','')") ]}</td>
   
                   </tr>
                </table>

END

return $html;

}
[download]

In the above code, what does this <<END and END mean ?
how can I change the code which is in between that <<END and END, to insert a if-else condition for that popup_menu.

To clarify further, depending on some values passed to that function, I want another popup_menu which will have a onload function instead of onChange.
In this above code, how can I do that by writing a if-else condition.