do { no strict "refs"; $subname->( 4 ) }