C:\Users\mm>type multibyte.txt | perl.pl
SV = NULL(0x0) at 0x12fe81c
  REFCNT = 1
  FLAGS = (PADMY)
Use of uninitialized value $char in concatenation (.) or string at C:\Users\mm\perl.pl line 23.
{}