$x = sub {print "this is an anon sub\n"}; #set a reference to anon sub
$x->(); #execute that anonymous subroutine by dereferencing it