Re^2: How to access each char in a string most quickly?

in reply to Re: How to access each char in a string most quickly?
in thread How to access each char in a string most quickly?

      {
         my @string='aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaaaaaaaaaaaaaaaaaaaa';
     shift @string;{}
      }
[download]

This is nonsense, did you mean?

my @string = ('a')x50;
while (shift @string){
  ;
}
[download]

citromatik

In Section Seekers of Perl Wisdom