Zugriff auf x-tes Zeichen im Sting

[XaraX]

Hallo Robert,

gibt es eine einfachere Methode in Perl, auf das x-te Zeichen eines Strings zuzugreifen als die substr-Methode?

soweit ich weiß, gibt es keine Möglichkeiten wie in python (var[17,1]) oder php ($var{17}/$var[17]).

$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.

Gruß aus Berlin!
eddi