#!perl -lp $_.=' = '.eval'('x s/\D/)$& /g.$_;s/\)/ /g