A  It has been my goal to use a here document
    so that I need have only one set of code to
    accomplish three tasks:
    1 acknowledge receipt of a customer's order
    2 archive a copy
    3 e-mail a copy to the order fillers

B   my $city = $Response->Form( 'city' )->{Item} ;   
     $Response->Write(<<EOT) ;
     <tr><td align=right>City:</td><td align=left>$city</td></tr>
     EOT
               does produce a here document

C    But I am not able to capture it for reuse, at least not with
      $Msg = $Response->Write(<<EOT) ; 

      followed by
      print TFILE $Msg ;     for archiving
      Send( $Msg ) ;          for e-mailing

D    The here document approach works with perl and CGI :
     my $q = new CGI ;
     $q->import_names('Q');      

     $Msg = <<MYHEREDOC ;
     <tr><td align=right>City:</td><td align=left>$Q::city</td></tr>
      MYHEREDOC

      which is importing values out of a namespace
      as opposed to using a method to retrieve a value

E    Does the object model have a means of importing from a namespace?

Jim Doyle

_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

Reply via email to