Re^2: binary converter

The position shoul be digit :-)

In either case you do not need the index nor the ** operator.

my @digit = reverse split //, $bin;

my $num = 0;
for my $bit (@digit) {
 $num = $num * 2 + $bit;
}
print "\n$num\n";
[download]

Jenda
Enoch was right!
Enjoy the last years of Rome.

Comment on Re^2: binary converter Select or Download Code

Replies are listed 'Best First'.
Re^3: binary converter by Limbic~Region (Chancellor) on Apr 23, 2013 at 17:25 UTC
Jenda, Or digit should have been position. I wouldn't have written the code I did for myself - it was intended to be more instructional since the OP indicated not understanding the for loop. I guess I should have paid closer attention (updated now). Thanks! Cheers - L~R	[reply]