Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re^3: Replacing a special character

by pvaldes (Chaplain)
on Jun 16, 2013 at 22:06 UTC ( #1039246=note: print w/replies, xml ) Need Help??

in reply to Re^2: Replacing a special character
in thread Replacing a special character

okey, okey, it was about the idea not about the execution. The idea is that you could wish (or not) to make the replacement before populating your array. It depends on your specific case or goals

Replacing a special character by something, full version

while (<DATA>){ s/\*/* /g; print }; __DATA__ ******************* ********************

Returning to the question

I have an array with some special character like '*' and i want to print " " (space ) every where I find this '*'
if($dlog2[$co] eq '*') { print $fh " ,"; }

By "print everywhere" I'm understanding (maybe incorrectly) "everywhere in my array". You are not printing to your array. You are printing to a filehandle that contains and points to... well... who knows. Scalar. Not an array.

If you want to modify your array, the idea could be: if some element of my array eq to '*' reasign again this element to ' '

if($dlog2[$co] eq '*'){ $dlog2[$co] = ' '}

Or maybe, to clean your problematic characters before, with a global replacement, and forget about the '*' in your file.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (8)
As of 2016-09-28 22:54 GMT
Find Nodes?
    Voting Booth?
    Extraterrestrials haven't visited the Earth yet because:

    Results (541 votes). Check out past polls.