Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: replace/substituion 4th field

by 2teez (Priest)
on Feb 20, 2013 at 08:12 UTC ( #1019731=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
       ...
        if ( $sum > 310 ) {
    ...
            $line =~ s/(.*?)\,(.*?)\,(.*?)\,(.*?)\,(.*?)\,(.*?)/$1\,$2\,$3
    +\,$sum3,$5,$6/g;
        }
     ...
    
  2. or download this
    623192729079,510993192729079,19,volemd,0,133,282051608,
    623192728769,510993192728769,19,310,0,118,84950715,
    ...
    622198575655,510992198575655,19,1,0,
    623192724589,510993192724589,19,volemd1,0,
    622743581281,510992743581281,19,71,0,
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1019731]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (10)
As of 2014-09-18 12:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (114 votes), past polls