Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Kozz Re: Limit to Line Length?

by Kozz (Friar)
on Jan 26, 2001 at 22:18 UTC ( #54590=note: print w/replies, xml ) Need Help??


in reply to Limit to Line Length?

This is good advice, and good questions.
No, I'm not sure that it's not a logic issue. It's running on Linux, Perl 5.005_03. And the text editor doesn't have anything to do with it, since when I'd grep the text file for a pattern which is SUPPOSED to be there, it wouldn't show up. And again - the only thing touching these files were perl scripts.

There are, however, a few things going on in the script which could have some consequences... primarily, my former bad habit of open,flock,read,close followed by open,flock,write, close rather than rewinding the file, writing, truncating, and closing.

Further research leads me to realize that the dates contained within the records indicate that nothing past a certain date was appearing, and since new records are simply appended to the file, you might indeed be right that this is a flocking issue.

Notwithstanding my confidence in my ability to use FLOCK, I still think I made some mistakes, and I appreciate Tilly's soft criticism which made me re-think my methods.

I think I'll go look at and fix some code. I humbly thank all of you for your research and insight. :-)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://54590]
help
Chatterbox?
[Discipulus]: good morning Corion!
[Corion]: I spent parts of yesterday digging into Filter::Simple to make it not change the line numbers of unfiltered code, but I think I need regex help (which will come in a SoPW I guess). I tried @lines = /((?:"...."|[^" \n]+)\n)/gs, but that matched on...
[Corion]: ... foo "\0\0\0\n" bar\n by matching the first \n instead of matching the four-bytes-in- double-quotes part
[Corion]: ... and I still don't understand why ;)
[Corion]: This is because Filter::Simple does some string-trickery, replacing all string literals with "quoted packed numbers"
[Corion]: I fear this might be a bug in the RE engine, but if it is a bug, even fixing won't help me because I need Filter::Simple for Filter::signatures , which provides signatures as a backwards compatibility feature for Perl <5.22 - and these ...
[Corion]: ... won't get a fix anyway ;) My plan B is to encode the string placeholders avoiding \r and \n

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (10)
As of 2017-01-23 08:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (191 votes). Check out past polls.