5 lines
116 B
Perl
5 lines
116 B
Perl
|
use charnames qw(greek);
|
|||
|
|
$x = "\N{sigma} \U\N{sigma}";
|
|||
|
|
$y = "\x{2708}";
|
|||
|
|
print scalar reverse("$x $y"); # ✈ Σ σ
|