in reply to Replacing underscore characters with whitespace

You really should do the reading the others suggested, and CGI.pm and taint mode are a good idea too.

How embarassed will you be if your script allows someone to crack the machine and use it as a kidporn or war3z trading server?

Anyhow, just so you can fix your current "URGTENT" urgent problem (and right after that, read the links provided by the good monks). 

$variable =~ s/_/ /g;

[download]
translated, that's "variable becomes substitute /(underscore)/ with /(space)/ globally

Replies are listed 'Best First'.
Re: Re: URGTENT: Need to remove undescore characters
by markinoz (Initiate) on Jun 14, 2002 at 02:39 UTC
    Hi thanks for your help. I didnt write the survey script, Im only trying to hack it for aesthetics sake. My client didnt like how the title looked with _ chars in it. Anyway I added the code you suggested ( I use seach and replace every day thru command line for line breaks etc ) so maybe I didnt explain myself correctly, I knew how to do the replace just wasnt sure of the structure for it. Again thanks and heres what I added 
    $String = "$survey"; 
$String =~ s/_/ /g;

    [download]
    then called $string instead of $survey in the html title simple huh?? see you around and thanks for everyone who posted. p.s. when the boss gives me a few minutes to breath Ill read the links as suggested. Mark R
[reply]
[d/l]
      You're welcome... it's good to see people learn, to be honest i often have to look up the most basic things myself.

      One minor hint:
      When you want to assign the value of one variable to another, you needn't quote the original variable.

      Hence, 

      $String = "$survey";

      [download]
      is actually better written as: 
      $String = $survey;

      [download]
      Perl is flexible enough to live with the first version, but that ability was really meant more for things like this: 
      if ($something) {
    # do some stuff
}
else {
    # there was an error, set it
    $error = "informative error message";
    $error_num = 45;
}

print STDERR "Error $error_num    $error";

      [download]
      This will (if there was an error, ie $something was not true) produce:
      Error 45    informative error message on the STDERR output (or in a logfile, or wherever you printed the error)

      In any case, please do take a look at those other links in this thread, if you read/heed them, you'll actually get better answers much more quickly at this site.

      have a great day!

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom