Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

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

by citromatik (Curate)
on Jul 03, 2009 at 08:14 UTC ( #776981=note: print w/replies, xml ) Need Help??

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;{} }

This is nonsense, did you mean?

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


Replies are listed 'Best First'.
Re^3: How to access each char in a string most quickly?
by Marshall (Abbot) on Jul 03, 2009 at 08:24 UTC
    I am striking this whole post as this didn't work out very well. Somehow the main point just got completely lost. Perl is not a great character by character language and its just not the right way to use Perl, but somehow I wasn't able to get this across. Oooops. Yes. You are correct!!.

    This whole thread is a bit weird as the idea of processing a char at a time is sort of "anti-Perl".

     The code should be: while (my $var =shift @string){} But that makes no difference.

    Rate Split Substr pre_splitted Shift Split 8851/s -- -73% -94% -98% Substr 32226/s 264% -- -80% -95% pre_splitted 158028/s 1685% 390% -- -73% Shift 587199/s 6534% 1722% 272% --

    The main point is that shift() is very, very fast, but Perl will work with regex even faster. I mean so what do you do with these chars that were read individually?

    Update: Well Darn! the code above is not right, and I think I could write some faster "get a character" code, but that is just not the point at all!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://776981]
[holli]: i'd like to keep my sanity, tyvm
[holli]: at least what's left off it :)
[LanX]: the+everything+ bible
[LanX]: http://web.archive .org/web/ 20071005212040/ http://www. Everything %20Diagram
erix .oO( hm, tough beans )

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2017-11-20 21:49 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (294 votes). Check out past polls.