Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re^3: Frequency Analysis Of A Subset Of A File

by BrowserUk (Pope)
on Apr 24, 2013 at 20:45 UTC ( #1030525=note: print w/replies, xml ) Need Help??


in reply to Re^2: Frequency Analysis Of A Subset Of A File
in thread Frequency Analysis Of A Subset Of A File

And if the file contains 0 newlines? Update: Or, you want newline characters to be include in your tuples.

Then read fixed sized blocks instead of lines:

C:\test>perl -e"BEGIN{$/= \1024}" -nle" rand() < 0.1 and print length( +)" 986831-01.dat 1024 1024 1024 1024 1024 C:\test>perl -e"BEGIN{$/= \1024}" -nle" rand() < 0.1 and print length( +)" 986831-01.dat 1024 1024 1024 C:\test>perl -e"BEGIN{$/= \1024}" -nle" rand() < 0.1 and print length( +)" 986831-01.dat 1024 1024 1024 1024

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1030525]
help
Chatterbox?
[Discipulus]: be your path light Pirsig
[Corion]: Hi Discipulus!
[Discipulus]: your chautauqua was important for me
[Discipulus]: Hi Corion here is holiday: the best we have Liberation Day
[Discipulus]: waiting sons to finish home assignments and we go out to some park
[Corion]: Discipulus: Oh ;) I'm looking forward to 1st of May - the next holiday here ;)

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (7)
As of 2017-04-25 11:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I'm a fool:











    Results (449 votes). Check out past polls.