Help for this page

Select Code to Download

Select or download this

binmode STDIN, ':encoding(UTF-8)';

...
while (<STDIN>) { 
   # work with $_ here
}