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: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
