Включайте Perl в Java

Наверное, проще на другом языке. Вот мое решение:

common_bit=$(perl -le '($s,$t)=@ARGV;for(split//,$s){last unless $t=~/^\Q$z
 Наверное, проще на другом языке. Вот мое решение: 
 [110] 
 Если бы это не было одной строкой, я бы использовал более длинные имена переменных, больше пробелов, больше скобок и т. Д. Я также уверен, что есть более быстрый путь, даже в Perl, но, опять же, это компромисс между скоростью и пространством: он использует меньше места на длинном однострочнике. 
/;$z.=
 Наверное, проще на другом языке. Вот мое решение: 
 [110] 
 Если бы это не было одной строкой, я бы использовал более длинные имена переменных, больше пробелов, больше скобок и т. Д. Я также уверен, что есть более быстрый путь, даже в Perl, но, опять же, это компромисс между скоростью и пространством: он использует меньше места на длинном однострочнике. 
}print $z' "$string1" "$string2")

Если бы это не было одной строкой, я бы использовал более длинные имена переменных, больше пробелов, больше скобок и т. Д. Я также уверен, что есть более быстрый путь, даже в Perl, но, опять же, это компромисс между скоростью и пространством: он использует меньше места на длинном однострочнике.