in reply to Pattern Substitution..

ummm...

$default_str = "good food";
$string1 = $default_string;

you need to use the same variable name ;) perl -w will help catch errors like that.

Update arturo of course, is right too, dunno if your problem was the misspelling or if that just happened when you put the code on perlmonks
                - Ant