Select Code to Download

  <form action="prog1.cgi">
    ...
...
    ...
    <input type="submit" value="Edit">
  </form>

  my $btn = $q->param('button');
  if( $btn eq 'viewBtn' ){
...
  }else{
    ...
  }