#!perl -plaF\b
$_="@F = ".eval'('x s#\*#)*#g.$_