RosettaCodeData/Task/Unicode-strings/Perl/unicode-strings-4.pl
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

1 line
67 B
Perl

print "Say עִבְרִית" =~ /(\p{BidiClass:R})/g; # עברית