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

Re^2: variable interpretation while reading from a file

by choroba (Canon)
on Nov 29, 2013 at 14:31 UTC ( #1064962=note: print w/ replies, xml ) Need Help??


in reply to Re: variable interpretation while reading from a file
in thread variable interpretation while reading from a file

What is next doing there? Also, /g might be needed if variables can be repeated on lines; and it gets very tricky if a variable's name is a part of other variable's name:

my car is $car_colour $car
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ


Comment on Re^2: variable interpretation while reading from a file
Select or Download Code
Re^3: variable interpretation while reading from a file
by ww (Bishop) on Nov 29, 2013 at 16:06 UTC

    Aaaarghhhhh. Good catch! Thank you.

    next is a left-over (forgetfully 'unremoved') from an alternate approach which was later abandoned.

    As to the possibility of multiple variables with similar name_parts -- all on a single line: that's not something I considered, as it appears to be outside the OP's spec. Oversight aside, however, that does indeed make the coding a little tricky...
          ... perhaps something like this [added to prev code and, yes, with the next removed :-)]:

    say "\tDone with source and sink files\n"; $/ = "\n"; # restore record separator my @choroba = ('choroba my car -- a $car -- is $car_colour. Choroba-', 'choroba my car2 is $car_colour $car. Choroba-', 'choroba my car3 is $car_colour $car Choroba-', 'choroba my car4 is $car_colour and |secondinstance: $ca +r_colour| |firstinstance:$car| Choroba-', ); for (@choroba) { if ( $_ =~ /choroba/ .. /Choroba-/ ) { s/choroba/ /; # ... s/Choroba-/ /; # or set record separator s/\$car_colour/red/g; # yup, need the g s/\$car[^_]{1}/ford/; say $_; } }
    which produces terminal output:
    Done with source and sink files my car -- a ford-- is red. my car2 is red ford my car3 is red ford my car4 is red and |secondinstance: red| |firstinstance:ford

    Fun!

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (4)
As of 2015-07-05 14:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (67 votes), past polls