use strict;
use warnings;
# answer: http://o...content-available-to-author-only...e.jp/qa/q7095814.html
my $doc = "(L)12×(H)34×(W)56\n";
$doc =~ s/(\([LHW]\)\d+)/$1cm/ig;
dXNlIHN0cmljdDsKdXNlIHdhcm5pbmdzOwoKIyBhbnN3ZXI6IGh0dHA6Ly9vLi4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi5lLmpwL3FhL3E3MDk1ODE0Lmh0bWwKCm15ICRkb2MgPSAiKEwpMTLDlyhIKTM0w5coVyk1NlxuIjsKJGRvYyA9fiBzLyhcKFtMSFddXClcZCspLyQxY20vaWc7CgpwcmludCAkZG9jOw==