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