Re: How do I test my substitutions?

[ToddAndMargo]

On 08/14/2018 08:29 AM, yary wrote:
Or, store the string in $_, and take advantage of less to type-
perl6 -e '$_="abc"; say so /z/; say so /b/; s/c/defg/ ?? .say !! say 
"Failed!"'



-y

Thank you!

Well I can see it working, but what does

   "so"
   "??"
   ".say"
   "!!"

do?


My actual code will look something like

p6 'my $x="abc"; if not ( (my $y = $x) ~~ s/b/1/ && $y ~~ s/c/2/ ) {say 
"failed"}else{say "worked"}; say "$y";'

worked
a12