#!/usr/bin/perl
@ds=("12_3", # 6s
"313__", # 8s
"4_35_1264_23_434", # 60s
"123456789123456789", # 98s
"88967472612377988186", # 149s
"19898693316679441672", # 170s
"93769682716711132249893" # ?
);
for (@ds) {
$s = 0;
while (/^(_*)(\d)(.*)$/) {
$_="_$3$1";
for $i (1..$2) {
}
}
}
IyEvdXNyL2Jpbi9wZXJsCkBkcz0oIjEyXzMiLCAjIDZzCiAgICAgIjMxM19fIiwgIyA4cwogICAgICI0XzM1XzEyNjRfMjNfNDM0IiwgIyA2MHMKICAgICAiMTIzNDU2Nzg5MTIzNDU2Nzg5IiwgIyA5OHMKICAgICAiODg5Njc0NzI2MTIzNzc5ODgxODYiLCAjIDE0OXMKICAgICAiMTk4OTg2OTMzMTY2Nzk0NDE2NzIiLCAjIDE3MHMKICAgICAiOTM3Njk2ODI3MTY3MTExMzIyNDk4OTMiICMgPwogICAgKTsKZm9yIChAZHMpIHsKICBwcmludDsKICAkcyA9IDA7CiAgd2hpbGUgKC9eKF8qKShcZCkoLiopJC8pIHsKICAgICRzICs9IGxlbmd0aCgkMSkgKyAkMjsKICAgICRfPSJfJDMkMSI7CiAgICBmb3IgJGkgKDEuLiQyKSB7CiAgICAgICRfPXN1YnN0cigkXywxKS5zdWJzdHIoJF8sMCwxKTsKICAgIH0KICB9CiAgcHJpbnQgIjogJHNcbiI7Cn0=