filehandle3 => sub {
        open my $str_fh, "<", \$str or die "cannot open fh $!";
        my @lines = map { chomp; s/o/i/g } <$str_fh>;
     },