$ perl -MO=Deparse,-p -e 'length "    " x $expr + $margin'
length((('    ' x $expr) + $margin));
-e syntax OK