프로젝트 오일러 16번

2¹⁵ = 32768 의 각 자리수를 더하면 3 + 2 + 7 + 6 + 8 = 26 입니다.
2¹⁰⁰⁰의 각 자리수를 모두 더하면 얼마입니까?

일반적으로는 Math::BigInt를 사용하여 큰 정수를 처리하겠지만 이번에는 bigint를 사용해봤다.
bigint는 기존 연산자를 그대로 이용하여 프로그래밍 할 수 있어 편하니까…

#!/usr/bin/env perl
use 5.010;
use strict;
use warnings;
use bigint;

my $r = 0;
my @a = split(//, 2**1000);
for (@a) {
	$r += $_;
}

say $r;

#!/usr/bin/env perl

use 5.010;

use strict;

use warnings;

use bigint;

my $r = 0;

my @a = split(//, 2**1000);

for (@a) {

$r += $_;

}

say $r;

blog.update.sh