sub c{ return caller(); } print c();; main (eval 16) 1 print scalar c();; main