-bash-3.1$ cat -n prueba.pl
     1  use strict;
     2  use encoding 'utf8';
     3
     4  my $x = 'αινσϊρ€';
     5  $x =~ m/αινσϊρ(€)/;