[Mpls-pm] MIME::Base64 on Windows

Gypsy Rogers gypsy at freeq.com
Mon Jun 7 13:31:40 CDT 2004


I didn't use CGI.pm because it was a quicky test script to
prove a point... when use MIME::Base64; is uncommented the
script times out, when it is commented out the script works
fine. The script I sent was my test not the actual script
which was too long and might have had other errors in it.




On Mon, 7 Jun 2004 13:24:13 -0500
 Josh Jore <josh at grenekatz.org> wrote:
> On Mon, Jun 07, 2004 at 01:09:28PM -0500, Gypsy Rogers
> wrote:
> } 
> } I have a simple script (below) that when I try to use
> } MIME::Base64 it just spins forever and eventually times
> } out. It does not throw an error. Just wondering if any
> of
> } you have run across this same issue with this module
> before
> } or any other issues when trying to use modules on
> Windows.
> 
> I wonder if you accounted for Win32's normal IO filter
> which
> translates \n to \r\n. I'd also wonder why you didn't
> just have CGI.pm
> do that for you so it'd happen correctly and portably.
> I'd also have
> used CGI.pm's HTML generation features but that isn't of
> relevance to
> the problem you expressed.
> 
> use CGI qw( header );
> print header() . "\nboo<BR><BR>\n\n";
> 
> OR
> 
> binmode STDOUT;
> print "Content-Type: text/html\n\n...";
> 
> OR if you were me
> 
> use CGI qw( header start_html br end_html );
> 
> print
>     header()
>     . start_html()
>     . p( "\@INC:"
>          . join( '',
>                  map $_ . br(),
>                  @INC ) )
>     . p( "D:/yatta/whatever"
>          . join( '',
>                  map $_ . br(),
>                  glob "D:/yatta/whatever/*" ) )
>     . end_html();
> 
> -- 
> Josh




More information about the Mpls-pm mailing list