특정 개수 문자를 제외한 부분을 얻어내는 regular expression

뒷부분 6개의 문자를 제외한 것을 추출하는 regular expression

      $num =~ m/^(\d+)(\d{6})$/;  
      print $1; print "\n";  
      print $2; print "\n";