in reply to defining a new var on the spot

You could try to do this with eval:
$name = 'anyVarName'; eval ("\$$name = 20;"); print $anyVarName;

Best regards,
perl -e "print a|r,p|d=>b|p=>chr 3**2 .7=>t and t"