Zugriff auf x-tes Zeichen im Sting

[Struppi]

$x = 17;
$str = "Es begab sich aber zu der Zeit, daß ein Gebot von Kaiser Augustus ...";
$c = substr($str, 17, 1);
erscheint mir irgendwie "unperlisch" und ineffektiv.
Ich muß einen String Zeichen für Zeichen durchgehen und abhängig vom jeweiligen Zeichen diverse Aktionen ausführen

dafür gibt es reguläre Ausdrücke http://perldoc.perl.org/perlreref.html/http://de.selfhtml.org/perl/sprache/regexpr.htm.

Die aber wesntlich uneffektiver sind, wenn es nur darum geht ein Zeichne an der x-Stelle zu ermitteln.

Wenn er jede einzelne Stelle ermitteln will, ist es wohl besser den String erst zu splitten und dann mit dem Array zu arbeiten.

my @str = split //, $str;
$c = $str[17];

Struppi.