All,
In
this node, I recommended a solution which had a first step of indexing the position of newlines in a string. I believe my overall approach to be sound, but there are many ways the first step could be accomplished. Since the
Anonymous Monk appeared to have speed in mind, I decided to
Benchmark a few idea.
I briefly discussed this in the CB before deciding to post it here as there was no obvious concensus reached. Keep in mind there will be an unknown number of newlines but the string itself will be no larger than 200K.
- Use a regex
- Walk the string using successive calls to index
- Treat the string as a filehandle and use $/ and tell
Do you have any other ideas? Use the following string construction for the basis of your benchmark.
sub build_str {
my ($str, $max) = ('', 200 * 1024);
while ( length($str) < $max ) {
# Assume lines are between 60-79 characters long
$str .= ('#' x ((rand 20) + 60)) . "\n";
}
return $str;
}
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.