Select Code to Download

use warnings;
use strict;
...
  print STDOUT (length $_) . " >$_<\n";
  print ">$_<\n";
  }

30 >ÐÏࡱá                >  þÿ<
18 >This is plain text<