핼로월드 문제.

http://hello-world.co.kr/?q=node/56

문제번호: 
9 


난이도: 
6 


문제설명: 
소설가 베르베르의 소설 개미에는 다음과 같은 수열이 등장한다.
1, 11, 21, 1211, 111221, 312211, 13112221, 1113213211, ...
일명 개미수열이라고 알려져 있으며 읽고 말하기 수열이라고도 한다.
이 수열은 앞의 수를 연속된 같은 숫자끼리 묶어서 읽는 방식으로 나열된다.
예를 들어, 21부터 시작을 한다면 2가 1개이고 1이 1개이므로 ,
12(1개의 2),11(1개의 1)로 나열이 되어 다음숫자는 1211이된다.
또한 1211은 1개의 1, 1개의 2, 2개의 1이므로 111221이 다음숫자가 된다.
이 수열의 특징은 다음에 나오는 숫자가 이전 숫자보다 길수밖에 없는데,
처음숫자와 상관없이 그 비율은 약 1.3(콘웨이 상수)배라는 것이다.
단 한가지의 예외는 22로 시작하는 수열로써 이 수열은 22,22,22, ...로
숫자의 길이가 늘어나지 않는다.
이제 개미수열을 프로그램으로 작성해보자.
숫자를 입력하면 이 숫자를 시작으로 수열을 출력하되, 무한수열임을 고려해 총 10개만 출력하도록 한다.

난이도가 6이라고 되어있길래 문제를 이해하기 조차 어려운걸까? 하고 벌벌 떨었는데....

내용은 쉬워서, 그냥 생각을 코드로 표현하는데만 익숙하면 구현문제는 없는 듯.

그러나 Code Golf (짧게 짜는거)를 하기엔 내공이 부족.

돌아가기만 하는데 촛점을 맞추었습니다. ㅋㅋ

$str = $ARGV[0];
@arr = split//,$str;
my @total_arr;
for (1..10) {
 push(@total_arr, join"",@arr);
 my @next_arr;
 $prev = @arr[0];
 $cnt = 0;
 for (@arr) {
  if($prev eq $_){
   $cnt++;
  }else{
   push(@next_arr,$cnt);
   push(@next_arr,$prev);
   $prev = $_;
   $cnt = 1;
  }
 }
 push(@next_arr,$cnt);
 push(@next_arr,$prev);
 @arr = @next_arr;
}
print join ",",@total_arr;

으...근데 임시변수들도 거슬리고

push(@next_arr,$cnt);
push(@next_arr,$prev);

이걸 두번이나 쓴것마저 심히 거슬려서 고쳐볼라 하는데 ...잘 안뵈네여.

뭐 시간이 늦었으니 그냥 넘어가고 나중에 고쳐봐야겠심 ㅡㅜ

펄도 공부하고 두뇌훈련도 할겸 이런식으로 매일 하나씩 풀어봐야겠습니다.ㅋㅋ