Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re: Choosing regex delimiters

by Not_a_Number (Parson)
on Feb 06, 2009 at 18:47 UTC ( #741981=note: print w/ replies, xml ) Need Help??


in reply to Choosing regex delimiters

Both versions work fine for me on XP Pro with Perl v5.8.8...

Update: Added output

C:\progs\perl>perl -p -e "s/(.*?)\.(\w\w\w),/iif([month]>,$1.$2,0) as +$2/" temp. txt iif([month]>,[01-estimate].jan,0) as jan iif([month]>,[01-estimate].feb,0) as feb iif([month]>,[01-estimate].mar,0) as mar iif([month]>,[01-estimate].apr,0) as apr C:\progs\perl>perl -p -e "s|(.*?)\.(\w\w\w),|iif([month]>,$1.$2,0) as +$2|" temp. txt iif([month]>,[01-estimate].jan,0) as jan iif([month]>,[01-estimate].feb,0) as feb iif([month]>,[01-estimate].mar,0) as mar iif([month]>,[01-estimate].apr,0) as apr C:\progs\perl>perl -v This is perl, v5.8.8 built for MSWin32-x86-multi-thread (with 12 registered patches, see perl -V for more detail)


Comment on Re: Choosing regex delimiters
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (9)
As of 2014-12-22 17:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (124 votes), past polls