> -----Original Message-----
> From: Timothy Kimball [mailto:[EMAIL PROTECTED]]

> print STDOUT $query->header(
>       -type => "video/mpeg",
> );
> 
> open MOVIE, $vidfile or die "Couldn't open $vidfile: $!";
> while ( read(VIDFILE, $_, 100_000) ) { print STDOUT; }
> close MOVIE;
> 

Thanks, this is exactly what I was looking for, but it brings
up another question...

Is there an advantage to using "read", as you did above, as opposed to 
just saying:

while(<MOVIE>){print;}
close MOVIE;

Or is it just a case of TMTOWTDI? 

Reply via email to