/dev/chat

A: replace several comma out side one or more sets of curly braces and exception that in one or more sets of curly braces

9:28 AM

0

You could do this simply through Perl+regex combination. perl -pe 's/(\{(?:[^{}]|(?1))*\})(*SKIP)(*F)|,/|/g' file Example: $ perl -pe 's/(\{(?:[^{}]|(?1))*\})(*SKIP)(*F)|,/|/g' file (999969|2500|"777777888"|0|"45265"|"65522"|NULL|10001|2014-09-15 10:27:07.287|2014-09-15 10:28:49.085|2014-09-1...

9:50 AM

@AvinashRaj while it seems correct, I don't really understand why one wouldn't simply use a CSV parser to start with...

yep, i think op takes this as a challenge.

@AvinashRaj Fair point.

I am too old and lazy to reinvent all the wheels :-)

:-)

11:42 AM

@AvinashRaj that answer would be great if you could explain how it works. You're using some pretty obscure syntax (most people won't know the recent and perl specific *SKIP and *F). Could you break it down and add an explanation?

Hell, I don't get most of it either.

12:08 PM

hmm, sure...

@AvinashRaj thanks, you have amassed some serious PCRE-fu these past few months! Well done!

give me 10 mins...

@AvinashRaj Take your time, whenever you can.

i think now you figured it out..

@AvinashRaj Not really to tell you the truth. I'm not familiar with *SKIP or with the (?1) notation. I know what they do, sort of, but I never use them so I find your solution very cryptic. It works like a charm mind and I sort of suspect what its doing but I'd like to see an explanation.

12:25 PM

yep, i'm writing...

@JennyD that's called experience 8-)

12:56 PM

@terdon "works like a charm and I sort of suspect what it's doing" - that's normal for perl code, with or without regexps :-)

@JennyD Well, if it were python or something with truly weird syntax, I'd say OK, but I'm supposed to know perl dammit!

@terdon Oh, I know that feeling...

@JennyD What's worse, the answer I was trying to decipher was written by @AvinashRaj who didn't even know perl a couple of months ago. Now, he's writing things I can't grok. No fair!

Darned whiz kids.

@terdon Indeed! Horrible!

it's in finishing stage..

1:05 PM

@AvinashRaj You're getting too good for me :)

@AvinashRaj I understand you're doing a search/replace and that a quick look, looks like you're using the lookahead/lookbehind but it would be nice if you explained how that worked. Even if it's reserachable, most ppl will not get what you're doing. It's nice when A'ers also educate others and are as self contained as possible.

It's a 1 line A which we generally discourage.

a bullet list breaking it down for the various pieces is all that I would be looking for, more than that would be great

@slm Not even. He's using the special *SKIP and *F to control backtracking and the (?) to group. I don't think there are any lookarounds there. I had to read perlre to get that much!

Ionică Bizău

Evening!

How to normalize an mp3 file to 100%?

Is normalize-audio -b foo.mp3 supposed to do so?

/cc @terdon

@IonicăBizău No idea, sorry. I don't even know what normalize-audio is.

See? I can't even write it.

Ionică Bizău

:D

1:31 PM

@IonicăBizău Normalize usually needs multiple mp3s to scan and then normalize the group

@terdon In either case it should be explained!

@slm Absolutely! I think he's working on the explanation though so lets not badger the poor guy :)

normalizing audio makes all the levels for the volume in the same range so that one isn't too loud while another is too quiet

Braiam

@terdon heh, a case where the disciple beat the master? :P

@Braiam Absolutely!

Ionică Bizău

in Ask Ubuntu General Room, 6 mins ago, by Takkat

like sox --norm silent.mp3 normalized.mp3

@slm This works.

1:33 PM

@terdon OK, saw that it was posted 3hrs ago and then he said he'd post some explanation in a few minutes

I've been working with Perl daily for more than a decade and it still surprises me. Sigh. I really should read a perl book from cover to cover one of these days.

@terdon one thing working w/ Perl has taught me is that it's impossible to know all the tricks.

that is Perl's flaw, it requires the reader to have to go comb through books and references to decipher

I've worked w/ it for over 20+ yrs

hence why there was so much emphasis on best practices and teaching ppl to write it in specific ways. The syntax was almost too flexible

@slm Dunno. I often talk with Tom Christiansen on the English Language & Usage room and he seems to manage. Then again, he's the author of the camel book and the perl cookbook so I guess he'd better :)

mind you, I like the lang too

I know, I know, it's only as obtuse as the author chooses it to be.

1:39 PM

yeah that's the problem, I"ve read so many programs by ppl that were self taught and that's been my big take away

a lang. should kind of prevent you from that

Didn't Tom write some perl checker program too? I can't think of it's name

@slm Yes, you should see mine. They'd probably get me shot in a CS department.

perl::critic was what I was thinking

@slm Maybe. I don't know, he sure as hell knows his Perl though.

yeah there's a small group of guys w/in the lang. that have been trying to improve the situation for years. Much of the plumbing on the internet is still Perl.

@terdon added. Correct if you found any errors ...

1:43 PM

at Kodak they had massive amounts of scripts and dynamic pieces to the various sites that were Perl based, and almost impossible to debug and remove

and did all types of nasty things

@AvinashRaj Thanks! That's one hell of an explanation!

I corrected some grammar and style issues and changed parentheses to braces since I think that's what you meant. parentheses==( and ) not { and }