>perl -le"print 3**4**2"
43046721