Changeset 18

Show
Ignore:
Timestamp:
11/07/00 14:32:38
Author:
miyagawa
Message:

added MSIE decode examples.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Mac-Macbinary/trunk/Macbinary.pm

    r17 r18  
    190190=back 
    191191 
     192=head1 EXAMPLE 
     193 
     194Some versions of MSIE for Macintosh sends their local files as 
     195Macbinary format via forms. You can decode them in a following way: 
     196 
     197  use CGI; 
     198  use Mac::Macbinary; 
     199 
     200  $q = new CGI; 
     201  $filename = $q->param('uploaded_file'); 
     202  $type = $q->uploadInfo($filename)->{'Content-Type'}; 
     203  
     204  if ($type eq 'application/x-macbinary') { 
     205      $mb = Mac::Macbinary->new($q->upload('uploaded_file'); 
     206      # now, you can get data via $mb->data; 
     207  }  
     208 
     209 
    192210=head1 TODO 
    193211