Re^2: Change variable multiple times within a single string?

Hi hdb,
Your solution would not only either set/reset and print the value 'yes' and 'no' for 'A' and 'B', but would also do for subsequent '1' also. And such that either 'yes' or 'no', were printed when the value of '1' is seen.
Though, the OP wanted 'yes' or 'no', for 'A' and 'B'.
So, I added this next if /1/; like so:

for (split //, $string ) {
  next if /1/;
  $yes_or_no = $decision{$_} if exists $decision{$_};
  print "$_ ($yes_or_no)\n";
}
[download]

Though the OP didn't give any information on what he expect when '1' is seen.

If you tell me, I'll forget.
If you show me, I'll remember.
if you involve me, I'll understand.
--- Author unknown to me

Comment on Re^2: Change variable multiple times within a single string? Select or Download Code

Replies are listed 'Best First'.
Re^3: Change variable multiple times within a single string? by hdb (Monsignor) on Apr 27, 2013 at 16:38 UTC
That is not correct! The value of the variable $yes_or_no will only be changed on the occurrence of 'A' or 'B' in the string. That is what `if exists $decision{$_};` is for, there is no entry of for '1' in the hash. Printing the variable in each line is only showing the current value. The OP had not really said what he wanted to do while running through the string, so I made something up. In a way, the print statement is completely superfluous, as the script would set the variable according to the wishes of the OP, but it would not be observable...	[reply] [d/l]
Re^4: Change variable multiple times within a single string? by 2teez (Vicar) on Apr 27, 2013 at 18:09 UTC
~ Printing the variable in each line is only showing the current value.. That is excatly my point. Since, what to print when '1' is seen is not known, I `think` is better to leave it out. Your output: `A (yes) 1 (yes) #? 1 (yes) #? 1 (yes) #? B (no) 1 (no) #? 1 (no) #? 1 (no) #? A (yes) 1 (yes) #? 1 (yes) #? 1 (yes) #? B (no) 1 (no) #? 1 (no) #? 1 (no) #?` [download] Output with a little modification: `A (yes) B (no) A (yes) B (no)` [download] OR one can provide for '1' in hash like so: `my %decision = ( A => 'yes', B=> 'no', '1'=>'', );` [download] Then the output shows: `A (yes) 1 () 1 () 1 () B (no) 1 () 1 () 1 () A (yes) 1 () 1 () 1 () B (no) 1 () 1 () 1 ()` [download] Just saying..... If you tell me, I'll forget. If you show me, I'll remember. if you involve me, I'll understand. --- Author unknown to me	[reply] [d/l] [select]