Hey Folks,

When run as a BBEdit text-filter the script works fine with the ascii line, but 
it produces goop for the utf8 characters.

Obviously I'm doing something wrong and need an assist.

Thank you.

--
Best Regards,
Chris

--------------------------------------

#! /usr/bin/env perl
use v5.12; use strict; use warnings;
use utf8; binmode STDOUT, ":utf8";
 
while (<>) {
        chomp;
        s!(.).*!$1!;
        my $var = $_ x 70;
        say $var;
}


aa
◊◊
¢¢


--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to