Perl: Strings durchlaufen

[implementation]

Guten Abend,

in letzter Zeit muss ich mich etwas mit Perl beschäftigen.
Nun möchte ich einen String in einer Schleife Zeichen für Zeichen durchlaufen, etwa wie in Delphi so:#

Delphi-Quellcode:

for i := 1 to Length(s) do
begin
   // Tu was mit s[i]
end;

Wie ließe sich das in Perl lösen? Da habe ich nirgendwo etwas zu gefunden. Geht das in Perl überhaupt? Oder muss ich dazu einen regulären Ausdruck nutzen?