Re^8: converting binary to decimal

guess what, refactoring fails,

      my $copy1b = '0' . $copy1;
      my $copy2b = $copy2 . $_;
      
      $n = ($copy1b | $copy2b);
[download]

copying it literally into the debugger too

  DB<38> say (0 . "$_" | 1 . "1") for qw/0 2 4 6 8/ 
11
11
15
15
11
[download]

The only fix is using |. and use feature 'bitwise';

  DB<39> use feature 'bitwise'; say (0 . "$_" |. 1 . "1") for qw/0 2 4
+ 6 8/ 
11
13
15
17
19
[download]

> voodoo89

Yeah, now go back and sacrifice 89 more chickens to the god of golf ;-P

Cheers Rolf
_{(addicted to the Perl Programming Language :)

see Wikisyntax for the Monastery}

Comment on Re^8: converting binary to decimal Select or Download Code

Replies are listed 'Best First'.
Re^9: converting binary to decimal by tybalt89 (Monsignor) on Jun 08, 2025 at 00:19 UTC
Er, Umm, no. `$ perl -le 'print(0 . $_ \| 1 . 1) for qw/0 2 4 6 8/' 11 13 15 17 19` [download] Most probable reason you are seeing what you saw -> you did "use feature 'bitwise'" earlier in your debugging session. 'bitwise' forces plain \| to numeric. ~~voodoo89~~ tybalt89 looks around for more chickens...	[reply] [d/l]
Re^10: converting binary to decimal by LanX (Saint) on Jun 08, 2025 at 11:06 UTC
> Most probable reason you are seeing what you saw -> you did `"use feature 'bitwise'"` earlier in your debugging session. `bitwise` forces plain `\|` to numeric. There was no "use feature 'bitwise'" inside the debugger. `:~$ perl -de0 Loading DB routines from perl5db.pl version 1.77 ... DB<1> say (0 . "$_" \| 1 . "1") for qw/0 2 4 6 8/ 11 11 15 15 11 DB<2>` [download] but the interactive debugger seems to automatically run under `-E` E commandline behaves just like -e, except that it implicitly enables all optional features and builtin functions (in the main compilation unit). See feature and builtin. Cheers Rolf _{(addicted to the Perl Programming Language :) see Wikisyntax for the Monastery}	[reply] [d/l] [select]
Re^11: converting binary to decimal by tybalt89 (Monsignor) on Jun 08, 2025 at 14:21 UTC
Good catch! Quick test: if `say 1 \|. 2` does NOT give an error, you're running with use feature 'bitwise';	[reply] [d/l]
Re^12: converting binary to decimal by LanX (Saint) on Jun 08, 2025 at 16:05 UTC
Re^11: converting binary to decimal by harangzsolt33 (Deacon) on Jun 08, 2025 at 15:32 UTC
Wait. Are you saying that if someone has "use feature 'bitwise' in their header, then this code fails? How do I make sure it doesnt? Can I write "no feature 'bitwise';" inside binary2decimal() to make sure it doesn't misbehave? Or is that unnecessary?	[reply]
Re^12: converting binary to decimal by LanX (Saint) on Jun 08, 2025 at 16:02 UTC