Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
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.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1039246]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (3)
As of 2016-12-06 03:17 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (99 votes). Check out past polls.