foo()->{x} foo() + bar() !foo() print(foo()) #### >perl -le"$x='Foo::var'; ${$x}='abc'; print $Foo::var;" abc