Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

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.


Comment on Re^3: Replacing a special character
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (9)
As of 2014-12-26 04:46 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

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





    Results (165 votes), past polls