Select Code to Download

#!/usr//bin/perl -wl
use strict;
...
my $string = "foo \N{COPYRIGHT SIGN} bar";

print "matched" if $string =~ /\N{COPYRIGHT SIGN}/;