Re: [tlug] utf form problems

["Marty Pauley" <marty.pauley@example.com>]

On 27/02/2008, Josh Glover <jmglov@example.com> wrote:
> On 27/02/2008, Keith Bawden <keith@example.com> wrote:
>
>  > >  > Marty Pauley wrote:
>  >  >  > my $input = undef;
>  >  >  > if (exists $ENV{CONTENT_LENGTH}) {
>  >  >  >    read(STDIN,$input,$ENV{CONTENT_LENGTH},0);
>  >  >  > }
>  >
>  > This is an excellent trim it makes it look like Marty wrote that code
>  >  snippet :-)
>
> Nah, if Marty wrote it it would look more like:
>
>  %{$%$!($"|$&$$^$#)$'$[}

That wouldn't work.  I would actually write:

  $/=$\;$_=<>;

which basically does the same thing as Steven's code.

-- 
Marty