#!/usr/bin/perl print (2**2**3)