Help for this page
$char = chr ord $string;
#!/usr/bin/perl -w ... _substr 588235/s 280% 140% -- -14% pop_chord 684932/s 342% 179% 16% --