Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...

my $a="aáaxBy";
$a =~ /(.*?)x(A*)y/;

Select or download this

Malformed UTF-8 character (unexpected continuation byte 0xa1, with no 
+preceding start byte) in pattern match (m//) at c:\Perl\work\gi\utfte
+st.pl line 9.